HOUSE 
SPECIALS 



COMPUTERS 



MONITORS 



Frintshop 
I. II & III 



jfapmcs Libraries 

73 95 

I Home Accountant-Tax Advantage 

•Book 64 951 

Disk Notchers 3 99| 

I Allsop Disk Banks 

30-3 7: or 60-5 '/«' 10 951 



Raba Wills 24 9! 

I Haba Writer 32 95 

Hippo-C 36 95 

I PC Intercom 74.95 

Chat 17 95 

1 VIP Professional 121.95 

1 Inlocom Games 29 95 

Hex 29 95 

Express 29 95 

I Degas 25 95 

hunDog 27.95 

1 Hippopatamus Software Call 



WHITE 20 LB 

2500 Shts. Laz. Edge 26.95 
1000 Shts. Laz. Edge 16.95 

500 Shts. Laz. Edge 11.95 

ASSORTED PASTELS 
2500 Shts. Laz. Edge 44.95 

100 Shts. Laz. Edge 26.95 

500 Shts. Laz. Edge 16.95 

Making Labels 1000 QTY 9.95 



r BONUS 


5V4 3V2 


SS/DD 


$9.50 - 


DS/DD 


13.50 - 


PRECISION 




SS/DD 


$8.75 - 


DS/DD 


11.75 - 


MAXELL 




MD1 


$15.95 32.95 


MD2 


19.95 38 95 


MEMOREX 




SS/DD 


$12.50 29.95 


DS/DD 


16.50 34.95 


FF30/20SS/DD 


- 59.95 


FF50/20SS/DD 


36.95 — 


FF50/20DS/DD 


42.95 - 


^ Ail Diskettes Carry a Lifetime Warranty 



800XL 


79 95] 


65XE 


Call 


130XE 


139 95 


520ST (RGB) 


Call 


520ST (MONO) 


Call 



STAR MICRONICS 

SG-10 210 95 

SG-15 369 00 

SD-10 321.95 

SD-15 441 00 

SR-10 469 00 

SR-15 582 00 

SB-10 565.00 

Powertype 299 95 

LEGEND 

154.95 

1080 205 95 

380 259 95 

1385 295.00 

OKIDATA 

Okimate 10 170.95 

Okimate 20 210.00 

182 219.95 

192 349.95 

PANASONIC 

KX-P1080 209.00 

KX-P1091 231.95 

KX-P1092 369.00 

KX-P1592 Call 

KX-P1595 Call 

KX-P3131 259.95 

KX-P3151 425.00 

CITIZEN 

MSP10 259.00 

MSP15 439.00 

MSP20 439.00 

MSP25 549.00 

SEIKOSHA 

SP-1000 179.95 

EPSON 

Call tor current pricing on all Epson 
models. 



PRINTER RIBBONS 
AND 

DUST COVERS AVAILABLE 



TEKNIKA 

MJ-10 189.95 

MJ-22 254.95 

ZENITH 

ZVM 122 74.95 

2VM 123 74.95 

AMDEK 

300G 117.00 

300A 127.00 

310A 145.00 

Color 300 175.95 

Color 600 289.95 

Color 700 469.00 

Color 710 539.00 

ATARI 

SM124 174.95 

SC1224 335.95 

NEC 

1201 139.00 

1205 139.00 

1260 79.95 

SAKATA 

SC100 159.00 

THOMPSON 

CM365 289.95 

14" RGB Color Composite Amber & 
Green Switch 

CM366 189.95 

14" Color Composite 



ii 



XMM301 39.95 

MPP1000E 52.95 

MPP1200 199.95 

Volks 12 175.95 

Volks 300 59.95 

Hayes 300 137.00 

Hayes 1200 385.00 

Team Modem 199.00 

(100% Hayes Compatible) 

Micro Stutter 89.95 

U-Call 36.95 

Compuserve 17.95 



SOFTWARE 



jP B^^h^^if^LJ^^^ 

*Homepak 31.95 

Paper Clip 36.95 

BRODERBUND 

Bank Street Writer 32.95 

Karateka 1895 

Lode Runner 18.95 

Print Shop 27.95 

Print Shop Companion Call 

Graphics Libraries I, II, & III ea. 16.95 
CONTINUAL 

Tax Advantage 34.95 

Home Accountant 32.95 

MICROPROSE 

F-15 Strike Eagle 20.50 

Silent Service 20.50 

Kennedy Approach 20.50 

OSS 

MAC 65 48.95 

Action 48.95 

Basic XL 38.95 

Basic XE 48.95 

Tool Kits 18.95 

SUBLOGIC 

Flight Simulator II 31.95 

Jet Call 

Night Mission Pinball 20.50 

SYNAPSE 

Synfile 31.95 

Syncalc 31.95 





1050 149.95 

Happy 1050 299.95 

Happy Enhancer 139.95 

U.S. Doubters 54.95 

DT Duplicator 149.95 

DT Doubler 54.95 

Indus GT 198.00 

SF314 215.95 

SF354 169.95 

Haba 10 Meg Hard Call 



INTERFACES 



[MPP1150 45.95 

U-Print/Port 49.95 

U-Print/16K 69.95 

U-Print/64K 79.95 

I PR Connection 64.95 I 



WHITE HOUSE 
COMPUTER 



P.O. Box 4025 
Williamsport, PA 17701 

"Where Prices are Bom, 
Not Raised." 



\l9titttftKttnti 



Ordering and Terms 

Place orders Monday-Friday 9am-7pm Customer service calls laken Monday-Friday 10 am 
4pm No deposit on C 0 D orders Free freight on all prepaid cash orders over $300 in the 
continental USA APO & FPO orders add $5 per hundred Priority mail add $10 per hundred All 
foreign orders add 8% tor shipping UPS shipping add $4 per hundred (East Coast) $5 per 
hundred (West Coast) PA residents add 6% sales tax Free shipping lor PA residents Orders by 
company and personal checks held 3 weeks Defective products require prior return authoriza- 
tion Detective products will be replaced or repaired according to warranty No used or recon- 
ditionod products sold Prices and availability are subject to change without notice 



ORDER TOLL FREE 
1 -Q00-351 -3442 

ALL CUSTOMER SERVICE CALLS 
AN|D PA RESIDENTS CALL 

1-717-322-7700 

VISA 4%, MASTER CARD 4%. AMERICAN EXPRESS 5% 




From Origin comes the long-awaited sequel 

fW W ^ to the award-winning 

¥ ¥ J # Ultima™ III t 




Quest of the 
/watar 




A state-of-the-art fantasy role- 
playing game of unprecedented 
magnitude by Lord British ". 





M repare yourself for a grand i 
j ^a^P r adventure: Ultima™ IV, 

sixteen times larger than j 
Ultima III, is a milestone in 
computer gaming— one that challenges 
your physical and mental skills while 

testing the true fabric of your character. ■few 

Enter Britannia, kingdom of Lord *C^aJ H 

British. Journey through terrain of infinite .;. mK^^^^^^ 

proportions, conversing with characters . ( ;M 

on hundreds of topics. Unravel the m — -Mm 

mysteries of a superior magic system. At each turn beware of daemons, dragons and 
long-dead wizards haunting the most tranquil of places. Encounters with parties of 
mixed enemy types test your strategic abilities. Shrewd use of terrain can lead to 
victory against seemingly impossible odds. 

Survive this multi-quest fantasy, then begin the final conflict, your quest of the 
Avatar. The ultimate challenge— the self— awaits.... 

tfifmsYSTEMS mc./MO HARVEY ROAD, MANCHESTER, NH 03103 (603) 644-3360 






ULTIMA rw III sends you on 
an incredible fantasy role- 
playing journey through 
monster-plagued Sosaria in 
search of the elusive 
Exodus. 



MOEBIUS ,M takes you 
through the elemental 
planes of a colorful Orien- 
tal world of fantasy and 
adventure in search of the 
Orb of Celestial Harmony. 



AUTODUEL ™ is a futuristic, 
fast-paced strategy role- 
playing game where the 
right of way goes to the 
biggest guns. 



OGRE rM is a strategy game 
fought on the nuclear bat- 
tlefield of tomorrow as an 
inhuman juggernaut Cyber- 
tank battles conventional 



Ultima and Lord British are trademarks of Richard Garriott/Moebius is a trademark of Greg Malone/AutoDuel and Ogre are trademarks 

of Steve Jackson/Apple is a trademark of Apple Computer Inc/Previous Ultimas are not needed to enjoy Ultima IV Authors wanted. Call us today. 



AMERICA'S MAILORDER HEADQUARTERS 



SAVE ?= PRINTERS 



INTERFACING AVAILABLE! 

OKIDATA 




1091 $228 

PANASONIC 

1091 228 

3131 (NEW) 264 

1092 325 

3151 409 

1080 (NEW) 209 

1592 NEW 439 



JUKI 

Juki 6100 344 

RS232 Serial Board 55 

6100 Tractor 119 

6100 Sheet Feeder 209 

Juki 6300 757 



C. ITOH 

Prowriter 8510 sp+ . . Call 

15505 sp+ Call 

Printmaster Call 



CITIZEN 

MSP-10 255 

MSP-15 355 

MSP-20 337 

MSP-25 495 

120D 188 

Premier 35 429 



LEGEND 



1080.. 
1380. 
1385. 
808... 



.Call 
.258 
.289 
..148 



Okimate 10 179 

182 214 

192 348 

193 563 



EPSON 

LX80 209 

FX85 333 

JX80 Call 

Homewriter 10 193 

DX10 207 

DX20 297 

DX35 597 

AP-80 244 

HI-80 355 

HS-80 298 

FX-286 (NEW) 489 

LQ-800 (NEW) 529 

LQ- 1000 (NEW) 659 




COLOR RIBBONS NOW AVAILABLE!! 



STAR MICRONICS 

SG-10 205 

SG-10C 219 

SG-15 367 

SD-10 319 

SD-15 438 

SR-10 469 

SR-15 578 

SB-10 589 

Powertype 297 

NX-10(NEW) CALL 

NB-15(NEW) CALL 

LEGEND 

808 148 

1080 197 

1380 224 

1385 268 



MONITORS 



520 ST 



AMDEK 

300 Green 118 

300 Amber 128 

310 Amber IBM 155 

Color 300 Audio 234 

Color 500 Composite 369 

Color 600 397 

Color 700 495 

Color 710 569 



THOMSON 

CM36512V1 269 

CM36632 159 



ZENITH 

ZVM 122A Amber 75 

ZVM 123G Green 75 

ZVM 124 Amber IBM 129 

ZVM 131 Color 275 

ZVM 133 RGB 389 

ZVM 135 Composite 449 

ZVM 136 Hi Res Color 589 

ZVM 1220 95 

ZVM 1230 95 

ZVM 1240 149 

TEKNIKA 

MJ-10 Composite 179 

MJ-22 RGB 255 



SIERRA 

ULTIMA II 39.95 

ACTIVISION (520 St) 

Borrowed Time 29.75 

Music Studio 29.75 

Hackler 26.75 

Mindshadow 29. /5 

HABA (520 St) 

Writer 49.95 



FTL GAMES 

Sundog 29.95 

MARK of UNICORN (520ST) 

HEX 29.95 

MINCE 129.95 

PC/lnterComm 99.95 



QUICKVIEW (520 St) 

Zoomracks 49.95 



MODEMS 

SUPRA 

Supra 300 (Atari) 49.95 
Supra 1200 (Atari)... 199.95 

DIGITAL DEVICES 

Pocket Modem AT Call 
Compuserve 18.95 


DRIVES 

INDUS 

GT Atari 195 

GT Commodore 195 

DISK NOTCHERS . . S7.95U 


ATARI 

130XE CALL 

65XE CALL 

800XL CALL 

520ST CALL 

1050 Drive 145 

1027 Printer 145 

850 Interface 109 

SF314 Drive 229 

Sf354 Drive 179 

1040 St (New) Call 

XM301 Modem 31 


MICROPROSE (Atari) 

Kennedy Approach ...21 .75 
Crusade in Europe....24.75 
Decision in Desert 24.75 

Solo Flight 20.75 

Nato Commander 20.75 

Spitfire Ace 18.75 

F-15 Strike Eagle 20.75 

Silent Service 20.75 

Conflict in Nam 24.75 



SSI (Atari) 

Nam 24.75 

Mechraged 34.95 

Antietam 29.95 

USAF 34.95 

SYNAPSE (Atari) 

Synfile 29.95 

Syncalc 29.95 

Template 14.95 

Mindwheel 24.75 

Brimstone 24.75 

ACTIVISION (Atari) 

Hackler 15.75 

Mindshadow 15.75 

Ghostbusters 15.75 

Great Am. Race 15.75 

Music Studio 20.75 

Space Shuttle 15.75 

SUB LOGIC (Atari) 

Flight Simulator II.... 32. 7 5 

Night Mission Pinball 20.75 



3.5" DISKETTES 

DENNISON 

SSDD 5 pak 14.95 

SSDD 10 pak 26.95 

MAXELL 

SSDD 10 pak 29.95 

DSDD 10 pak 36.95 

3M 

SSDD 10 pak 26.95 

DSDD 10 pak 32.95 

DENNISON 

ELEPHANT 5V 4 " SSSD. .11 9-9 
ELEPHANT 5V4*' SSDD. 12 99 
ELEPHANT 5 1 /:" DSDD... 14.99 
PREMIUM 5Va" SSDD.. 3 99 

PREMIUM 5Va" DSDD 15.99 

VERBATIM 

5Va" SSDD 13.99 

5V4" DSDD 19.99 

BONUS 

5Va" SSDD 8.99 

5V4" DSDD . 12.99 



TOLL FREE 1-800-233-8760 



TO ORDER 



CALLTOLL FREE 1-800-233-8760 

In PA 717-494-1030 

Customer Service71 7-494-1 670 



or send order to 
Lyco Computer 
P.O. Box 5088 

Jersey Shore, PA 
17740 



RISK FREE POLICY 

In stock items shipped within 24 hou>-; ol order. No deposit on C O D. orders. Free 
shipping on prepaid cash orders within the continental U S Volume discounts 
available PA rosidents add salos tax. APO FPO and international orders add 
$5 00 plus 3°o lor priority mail service Advertised prices show 4% discount for 
cash, add 4% lor Mastercard or Visa Personal checks require 4 weeks' clearance 
belore shipping Ask abput UPS Blue and Red label shipping All merchandise 
earned under manufaclurer's warranty Free catalog with order All items subject 
to change without notice 
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Summer Fun Atari Style 10 




HHH 



Math Art 30 




Borrowed Time 93 



FEATURES 



SUMMER, ATARI STYLE by Gigi Bisson 

Camps, classes, travel and more 






10 


WEATHER WIZARD by Richard Staerzl 
Computerized weather forecasts 




TYPE-IN SOFTWARE 


19 


DECIDE by Jeffrey Summers 
Business decision analysis techniques 




TYPE-IN SOFTWARE 


23 


MATH ART by Marian Lorenz and Allan Moose 
Elegant designs from simple equations 


TYPE-IN SOFTWARE 


30 


RECIPE CONVERTER by James Brown 
Calculate those ingredient changes 




TYPE-IN SOFTWARE 


34 


MICRO JULIUS by Charles Postle 
1900-2100 perpetual calendar 




TYPE-IN SOFTWARE 


39 




SOFTWARE 


L 


1 B R A R Y 


TYPE-IN LISTINGS SECTION 






101 




D E P A R T M E N 


T 






GAME OF THE MONTH 

BOMB SQUAD by Paul Tupaczewski 
An explosive adventure 




TYPE-IN SOFTWARE 


43 


STARTING OUT 

NEW OWNERS COLUMN by David Plotkin 
Lesson 4: Nested loops 


TYPE-IN SOFTWARE 


46 


EDUCATION 

ATARI LEARNING CENTER by Gigi Bisson 
Learning with "the best educational machine" 




52 




ST R E S O U R 


c 


E VOLUME 1, NUMBER 11 


68000 EXCEPTIONS & INTERRUPTS by David Small 

Part II: Into the ST 


72 


BASIC BIORHYTHMICS by Stephen Whitney 

First ST BASIC application TYPE-IN SOFTWARE 


77 


ZOOMRACKS REVIEW by John Kosiorek 
Database with "time card" metaphor 




79 


DB MASTER ONE & 1ST-WORD REVIEW by Chris Chabris 

First-rate Atari "freeware" 


83 


FILE I/O INTRO by Patrick Bass 
Manipulate any ST disk file 




TYPE-IN SOFTWARE 


87 


ST PRODUCT NEWS 






90 




I/O ROARD 6 NFW PRODUCTS 


60 



ANTIC ONLINE 

PRODUCT REVIEWS. 



9 ADVERTISERS LIST. 
56 SHOPPERS GUIDE. 
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132 
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PRINTER DRIVERS 



"I recently purchased AtariWriter to go 
along with my GE TXP-81007Letter Qual- 
ity printer. Is there a printer driver avail- 
able that will access the special features 
of my printer?" one reader wrote. We're 
constantly getting requests like this. The 
following printer driver programs should 
work: 

Gary Furr Drivers— An old APX disk now 
available for $10 from the author. Sup- 
ports the Atari 1020, 1027, IDS-480; Ep- 
son MX, RX, FX-80/100 series; C. Itoh 
8510; Okidata 80, 82, 83, 84, 92 and 93; 
Mannesman Tally Spirit, 160L, and 180L; 
Diablo 620; Panasonic KX-P series; NEC 
8023A; Gemini 10 and 10X; BMCpb 401; 
and Silver Reed 770. Write Gary Furr, P.O. 
Box 1073, Mountain View, CA 94042. 

Printer Driver Construction Set. — 
$19-95 through the Antic Catalog. If your 
printer isn't among the several precon- 
figured ones, you can create your own 
with this disk. 

At A Glance Drivers— $14.95 for dot- 
matrix printers and $24.95 for daisy 
wheel printers. Supports most popular 
printers such as Epson, Star, C. Itoh and 
Diablo. At-A-Glance, 86 Ridgedale Ave- 
nue, Cedar Knolls, NJ 07927. Also avail- 
able through Antic mail-order adver- 
tisers such as CompuClub.—kH\\C ED 

DOWN TO BUSINESS 

I have been buying Antic at newsstands 
now since 1983. Your March, 1986 issue 
not only had a decent cover (as opposed 
to the usually kiddie-style coloring book 
type covers), but content to match: A 
business-oriented, no-nonsense issue. This 
reinforces my belief in the capabilities of 
the Atari computer and removes it from 
the game machine only image. 

H. Gerald Wittenberg 
Toronto, Ontario 
Canada 

I hope your new found professionalism 
continues and I hope covers like March '86 
keep on coming! 

Eugene Rhough 
San Jose, CA 



ATARI AT LAW 



We read with interest the article Atari at 
Work (March, 1986) about the commer- 
cial use of Atari 8-bit machines. Our law 
office is run exclusively with our Atari 
800. We have in excess of 200 forms saved 
on disk, including wills, deeds, trusts and 
corporate/business agreements. Our plead- 
ings, interrogatories and orders are all 
processed on AtariWriter and printed in 
letter quality on a Radio Shack DWP 410. 
With SynFile + , we maintain a database of 
all recent cases decided by the Courts of 
Ohio in our area of specialty. Our account- 
ing is maintained on VisiCalc, and since 
each partner has an Atari at home, writ- 
ing briefs after hours is no longer a chore. 
We would be anxious to hear from other 
Atari lawyers. 

John Lynett 
Olds, Lynett & 
Bradshaw 

49 South Main Street 
Akron, OH 44308 
S. KarlMohel, the Assistant Ocean County 
Prosecutor in Toms, River, Nf sent us a 
message via CompuServe to say that he 
uses his 520ST to write Appellate Briefs 
and is waiting for more business soft- 
ware.— ANTIC ED 



VIVE LE ATARI 



I'm writing to tell you about my club of 
Atari users in France. The address is: Soft- 
busters, c/o Oliver Meyer, 1 vie de la Liber- 
ation, 77436 Champagne/Siene, FRANCE. 

HABAWRITER IS OK 

The ST Resource Habawriter review 
(March, 1986) was substantially negative. 
My experience using the program since 
December, 1985 has been very positive, 
except for a small bug in the setting of tabs. 
The system has never crashed, and I would 
recommend it as a first word processing 
program. 

Jeffrey Falkenhan 
CompuServe I.D. 
73147,2330 

continued on page 8 
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ANTIC, The Atari Resource 



ATTENTION 800, XL, 400 and XE OWNERS: 
THE RAT* GIVES YOUR ATARI 'A GREAT FUTURE! 




Actual screen shows graphic versatility and resolution of ACCU-DRAW. 



$114 



95 



GETS YOU THE COMPLETE SYSTEM: 



You love your ATARI and you like the idea of using a 
mouse in a computer system, like some of the more ex- 
pensive systems. 

The RAT SYSTEM has software that gives you fast and 
easy control of the cursor during programming. And we 
are now developing some exciting new waves of software 
that will set a new standard for the Atari 8-bit computers. 
And at good prices! 

WE'RE GROWING. 
GROW WITH US. 



• The RAT, the hi-res mouse 

• ACCU-DRAW, the easy-to-use drawing program [used 
to make the drawing in the photo!](Vision software, 
48K) 

• CONTROL, the program that gives the RAT cursor- 
control during programming! 

• ' tne booklet that helps you use your RAT 
SYSTEM , (and shows you how to use your RAT in your 
programs, too!) 



SEND check or M.O. + $3.00 shipping to: 



ZOBIAN-CONTROLS 



DEALER INQUIRIES RO - Box 6406 

WELCOME! Wyomissmg, PA 19610 

(215) 374-5478 

*RAT is a registered trademark for 1 0 :0 ° AM to 3:00 PM 

Zobian Control's mouse device. 

Patent Pending. PA residents add 6% sales tax. 



CREATIVE LIE DETECTION 

It seems that your Atari Lie Detector pro- 
gram (March, 1986) could easily be 
adapted to the RCA jacks that exist on the 
AtariLab Control Module. With low prices 
for AtariLab, some people will be looking 
for new uses of this device. 

Michael Martin 
CompuServe I.D. 
7177,3022 
Rhett Bryson of the GrACE users group 
says he did a fascinating experiment by 
hooking the two clips of his do-it-yourself 
lie detector to one of the leaves on his 
house plant. He pressed a leaf on the op- 
posite side of the plant with his finger and 
thumb and was surprised to see a spike 
show up on the graph to correspond to 
the pressure!— ANTIC ED 

SINKING SUBS 

Silent Service won't work on my Trak disk 
drive. The program appears to boot, but 
my submarine kept sinking to the bottom 
of the ocean. I called Microprose and they 
said they do their development work on 
Atari drives and don't guarantee that their 
programs will run on Atari -compatibles, 
such as Percom, Rana, Indus and Astra. 
Microprose says their new copy-protection 
method may be causing this problem, but 
nowhere on the packaging is this disk 
drive detail mentioned. Luckily, the mail- 
order house I purchased the program from 
sent me a refund, but the sad part is that 
I really wanted the game! 

Karl Wiegers, PhD 
Rochester, NY 
"We desperately want to find an answer 
that will keep everybody happy" says 
Frank Schmidt, Microprose Director of 
Marketing He says that Microprose is try- 
ing to determ ine which brands of third- 
party disk drives do not work with Silent 
Service. Microprose is planning to print 
a disclaimer on all ads and packages to 
ivarn potential customers that the pro- 
gram is intended for use on Atari disk 
drives. They suggest calling their cus- 
tomer service number first before pur- 
chasing the program for a non-Atari 
drive.- ANTIC ED 



OKIMATE PAPER 



I was unhappy about the poor printout 
quality on my Okimate 10 printer until I 
found a smooth paper for both color 
dumps as well as text — Brother brand 
plain paper. I bought 500 sheets from Con- 
sumer's Distribution catalog for only 
$6.97. The results are even better than 
Okimate paper, which costs $9. 95 for 250 
sheets. 

Vincent Tan 



LUNAR FUEL 



Thanks for Daniel Deighan's excellent pro- 
gram, Lunar Lander Construction Set. If 
you're like me, you were wondering when 
line 230 would come into play. It has a 
print statement that prints "lost fuel 
dump". In order to find this lost fuel, guide 
your lander down the extreme left side of 
the fuel gauge and you'll receive a new 
supply of fuel. But remember, you can 
only do this once each game without de- 
stroying your lander. 

Tom Ambrosio 

Saxe, VA 



PARTNERS IN DOS 



I am a loyal fan of DOS 2.5, and my friend 
is a loyal fan of DOS 3. But when we trade 
programs, I can't put his program on my 
DOS 2 formatted disk. 

Garrett Denzer 
Kansas City, MO 
Atari DOS 2.5 has a conversion utility 
on the disk. —ANTIC ED 



MODEMS, PLEASE 

I bought practically all of my Atari stuff 
after reading Antic product reviews. The 
disk drive, printer and other product sur- 
veys really helped. But where is the 
modem survey and comparison? I'm defi- 
nitely buying a modem in the next six 
months. 

You'll find help in our 1986 Telecommu- 
nications issue, coming soon.— ANTIC ED 



128K DOWNGRADE? 

This is an open letter to all commercial 
and non-commercial software writers. I 
have an Atari 800 with an Axlon 128K 
RAMpower card installed. With all the 
hoopla surrounding the 130XE, it seems 
those of us who have been using RAM- 
disks for years are being pushed aside. 
Because the new 130XE RAMdisk uses a 
different address for access, the older 
RAMdisks are not compatible with 130XE 
software. 

My plea is this: Please try to incorporate 
these older, and in most cases superior, 
systems when you write programs for the 
130XE RAMdisk. Synapse did something 
like this with SynCalc by making provi- 
sions for Axlon 128K boards. The main 
reason I haven't purchased the 130XE is 
because I don't want to downgrade from 
160K to 128K. 

Donel Wyman 
Oskosh, WI 
We'll pass your request to those submit- 
ting articles to Antic. We also refer you 
to the article DOS 2.5 for Axlon RAM- 
disk," February 1986 Antic. -ANTIC ED 



AMDEK OWNERS UNITE 

I would be interested in contact with other 
Amdek disk drive owners. As you know, 
almost no software was published in this 
3-inch disk format. Maybe someone will 
even have disks to sell. My local source has 
dried up. 

John Hawkins 
64 Park Drive #C 
Dayton, OH i54l() 



COUNTRY ATARI 



Thanks for publishing such a fine maga- 
zine. I run a bulletin board on my 130XE 
here in Texas with 360K of online storage 
dedicated to country music information. 
Call The Gate" at (817) 865-5259, from 
6 pm to 6 am, seven days a week. 

Bennett Hamilton 
Music director, KPEP 
Gatesville, Texas 
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PERCOM REPAIRS 



In response to a number of queries from 
readers seeking repairs for their Percom 
disk drives, Antic has learned that a na- 



tionwide Percom repair contract has 
been awarded to STS Computers, 1073 W. 
Broad Street Falls Church, VA 22046. 
(703) 237-0558. Contact STS first for in- 
formation about repair rates and ship- 
ping.-ANT\C ED 




antic online 




■ Users 

■ /Vetwork 



WUN Disk Library Planned 



Type GO ANTIC when you log onto 
CompuServe in May. This month on 
ANTIC ONLINE you'll find in-depth 
coverage of the Worldwide Users Net- 
work (WUN) project to create a na- 
tional library of high-quality public 
domain disks. 

The planned monthly public do- 
main disks would be sold at meetings 
of Atari users groups affiliated with 
WUN. The disks would be fund rais- 
ers for the users groups — as well as for 
WUN itself, which is now headed by 
users representatives. 

Antic and Atari have both said they 
would be willing to donate some pro- 
grams for these disks. The future PD 
disk library is envisioned for both STs 
and 8-bit Ataris. Software for the li- 
brary would be chosen by a yet-to-be- 



named blue ribbon users committee. 
Online WUN Board meetings are on 
CompuServe the first Wednesday of 
each month at 10 p.m. Eastern Time. 
Anybody interested is welcome to 
look in, although only WUN Direc- 
tors can take part in the discussions. 
For more details, see the WUN Mes- 
sage Board on the SIG * Atari 16-bit 
section. 

SIGNING UP 

If you're not a CompuServe subscriber 
yet, see your local computer dealer or 
phone (800) 848-8199 for informa- 
tion about signing up. Ohio residents 
phone (614) 457-0802. There is no 
extra charge for accessing ANTIC 

ONLINE. 

□ 
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DISCOUNT PRICES 

187 Crosby Ave. Kenmore, N.Y. 14217 
ATARI 520 ST monochrome color - $679.95 

ATARI 520 ST color - $859.95 

call for 1040 ST 4 r | 

ATARI 130 XE - $139.95 

1050 Drive - $149.95 

HAPPY 1050 Enhancement - $139.00 

FREE SHIPPING ON ABOVE 



PRINTERS 

Legend 808 - $159.95 
Gemini SG10 - $214.95 
Volks 12 modem - $199.95 
call for 800 XL. 130 XE software 
Panasonic 1091 - $246.95 



PERSONALIZED MAIL ORDER SERVICE 

716-873-4349 



_4_ 



NASHUA 3% disk - $22.95 
NASHUA 5V< disk - $9.98 

for box of 10 
NASHUA Bulk - $85.00 

in quantities of 100 



ST SOFTWARE 
Final Word - $99.95 
D E G A S - $30.95 
VIP - $149.95 

Borrow Time - $39.95 
Flight Simulator II - $39.95 



Write or call for price list on our fine products from ST and XE. XL series. EPSON. MPP, 
modems and interface. Shipping: Add $2.50 for soltware. $5 each for hardware (or actual 
charges if less). International orders pay actual charges. Terms: COD orders accepted. All 
orders will be shipped UPS or best way. Sorry — no refunds or exchanges. 




DON 7 FORGET US! 



New Address: 



Name . 



Address . 
City 



State . 
Zip _ 



TJ 
"O 




Fill in coupon 
and mail to: 
Antic Publishing 
524 2nd St 
an Francisco, 
CA. 94107 
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SUMMER FUN 

ATARI STYLE 

CAMPS, CLASSES, MUSEUMS AND MORE 

by GIGI BISSON, Antic Assistant Editor 



We are the PacMen, tall and 
straight, in our feathers and war 
paint. Pow Wow. Pow Wow. We 
are the men of A-tar-i. — variation 
on a classic camp song 



When children aren't squealing and 
laughing, you can hear the sounds of 
summer. The wind rustling the leaves, 
rushing water, the chatter of frogs and 
crickets. . . and little fingers busily 
tap-tapping away at the keyboard. 
Logo and lakes, silicon and sunshine, 
computing and campfires? It may 
seem like a strange combination, but 
computers have now become a fixture 
at one of the most traditional of 
American institutions — the summer 
camp. 

The contemporary summer camp, 
no matter how remote, is not only 
likely to generate its own electricity 
to power all those computers, it might 
also have a color photography dark- 
room, a ham radio station, or an elec- 
tronics and robotics workshop. 
Marshmallow roasts and campfires ar- 
en't enough anymore — camping is 
now an educational exprience. 



"It's more likely for Camp Tall 
Teepees to offer computers than it is 
to find a Tall Teepees Computer 
Camp." says Jim Le Mon of the Ameri- 
can Camping Association. Le Mon 
says there are three kinds of computer 
camps— traditional camps that offer 
computing plus a wide range of out- 
door activities, computer camps that 
concentrate on computing and offer 
some outdoor activities, or day camps 
that are really computer workshops. 

If there is any news about 
computer-only camps, it's that many 
no longer exist. The nationwide chain 
of Atari-sponsored computer camps 
shut down when Jack Tramiel pur- 
chased the company. The largest 
chain of computer camps in the na- 
tion, Original Computer Camp, also 
closed its doors in 1984. 

Camp directors say that computer 
camps lost favor when most schools 
started teaching computing as a regu- 
lar activity. "When the price of com- 
puters dropped, that hurt us the 
most," says Roy Oken, director of 
now-defunct River Way Ranch Corn- 
continued on pase 13 
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A rare species of 
interactive illustrated 
fiction for the Atari ST 




AVAILABLE FROM 



AUTHORS 




UK PUBLISHER 



FIREBIRD LICENSEES 
PO BOX 49, RAMSEY, NJ 07446 



This illustrated adventure 
is destined to rival all the 
classics. Stunning graphics 
are the icing on the cake - 
but underneath lies the most 
advanced text operating 
system yet developed. 




The story is absorbing, 
humorous, lively, full of intrigue 
and puzzle, yet subtle enough 
to appeal to the beginner and 
the hardened adventurer alike. 

The Pawn' understands 
plain English, it knows the 
size, volume and weight of the 
game objects, their texture, 
and their magical properties 
(in fact the program stores 
135 pieces of information for 
each object). 



1/492 




The game is truly 
interactive, each character in 
the plot has a personality (even 
the animals!) and will respond 
intelligently to conversation . . . 

The Pawn' and further 
adventures will be available 
for all leading personal 
computers. 

Guaranteed to make a 
major impact on the market. 



FIREBIRD HOTLINE © 201 934 7373 



SUMMER FUN ATARI STYLE 

continued from page 11 



puter Camp. "It got cheaper to buy 
your kids a computer than sending 
them to camp for a week." 

The most successful computer 
camps blend camping with nature. 
"With all that outdoor activity, why 
would kids want to be penned up in- 
side?" says Warren Darner, the com- 
puting teacher at Camp Regis Apple- 
jack in New York's Adirondack 
mountains. Darner's roomful of VIC- 
20s has to compete with seven tennis 
courts, a 2 2 -boat sailing and motor- 
boat fleet, and a performing arts stu- 
dio. "But we do get real busy on a 
rainy day." he says. 

Nevertheless, the best computer 
camps are still thriving. I found 337 
different camps that offer computing 
as an activity — and that only includes 
camps accredited by the American 
Camping Association. 



WHY A 

COMPUTER CAMP? 

There are three good reasons to send 
your kids to a computer camp: 

1. Schools with anemic budgets 
can't privide adequate computer in- 
struction. If schools do have com- 
puters, kids often have spend more 
time waiting in long lines than they 
do online. One alternative for con- 
cerned parents is a computer camp. 

2. Some kids love computers so 
much that they refuse to go unless 
there's a computer at camp. 

3. You're afraid your kids are turn- 
ing into hackers and you hope they'll 
learn how to swim, sail, hike and get 
some fresh air. 

The camp setting offers an oppor- 
tunity to become immersed in 
computers — even three hours of com- 
puter instruction a day is a lot more 
than they'll ever get at school. Kids 
don't just learn how to use a word 
processor — they use it to write letters 
home to mom and dad. Arts and 
crafts could be pressing wildflowers 
one day, and designing a weaving pat- 
tern on a computer the next. 

But as with anything that's Atari- 
specialized in the Apple-dominated 



WHERE 
TO FIND 
A CAMP 



The premiere camping resource is the 
American Camping Association (ACA) 
Annual Parent's Guide to Accredited 
Camps. This 253-page nationwide direc- 
tory lists only camps accredited by the ACA. 
It indexes them by name, activities, loca- 
tion and special programs such as camps 
for hemophiliacs or the blind. 
Most importantly, the ACA catalog lets you compare prices. 
That alone is worth the $8.95 price of the 
book, ($10.95 outside the continental 
U.S.), which is refunded if you enroll in 
one of the thousands of ACA-approved 
camps for at least 14 days. For an addi- 
tional $10, the ACA computers will select 
a list of 10 camps meeting your special 
needs. 

ACA Parents Guide, 100 Bradford Woods, 
Martinsville, IN 46151, (800) 428-CAMP 

For additional camp listings in the East- 
ern U.S., check the camping advertisement 
sections of the New York Times Sunday 
Magazine. For Western camps, check Sun- 
set Magazine. 




world of educational computing, 
finding a camp that uses Atari com- 
puters involves a diligent search. Here 
are a few to get you started: 



COMPUTING TRADITION 

"Camp Diana-Dalmaqua is a very 
traditional camp," says director Judy 
Alter. Traditional, huh? Diana- 
Dalmaqa may offer those good old- 
fashioned camp activities like nature 
and science, swimming on a 30-acre 
lake and pioneering. But it also has 
go-karting, and programming on 12 
Atari computers. One of the oldest fa- 
cilities in the U.S., this co-educational 
camp 85 miles north of New York 
City was extablished in 1928. 

Camp Diana-Dalmaqua, 209 Tray- 
more Boulevard, Island Park, NY 
11558. (516) 431-0641. 



FORESTRY AND FORTRAN 

They may have a hokey advertisment 
featuring a girl hacking on a computer 
as she lies down on a diving board 
dangerously close to a swimming 
pool full of water. But don't be fooled. 
Midwest Computer Camp is the 
Cadillac of computer camps and one 
of the few that offers nearly every 
conceivable model of computer from 
Atari to VIC-20. Students are en- 
couraged to use a variety of different 
computers to develop true skill with 
the language or application they are 
learning. They can choose from BA- 
SIC, Pascal, Fortran, COBOL, Pilot, 
Logo and assembly language. And 
they can learn about robotics, lasers, 
holography, and how to run a bulle- 
tin board. 

Computing comes first, but not at 

continued on next page 
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the expense of nature. Lynn Crawford, 
founder and "Chief Kid" of Midwest 
Computer Camp is a wildlife refuge 
developer as well as a programmer. 
For him, balancing both technology 
and nature is a priority. Kids spend six 
hours on the computers every day and 
six hours outside. 

Situated on a magnificent old estate 
in a wilderness area northwest of In- 
dianapolis, Indiana, the camp has 
secluded trails for hiking and bird 
watching, a reservoir and grazing 
deer. Computer classes are taught by 
computing professionals in a huge 
colonial-style education center with 
classrooms and large meeting rooms. 
Activities range from Dungeons and 
Dragons games to forestry and as- 
tronomy. All of this costs $750 for 
two weeks for boys and girls aged 8 
to 18. A year-round weekend camp 
for adults and families costs $60. 

Crawford firmly believes that kids 
who learn how to use computers 
properly will have a better chance of 
succeeding in a world which, upon 
their adulthood, will be pervaded 



with the machines. "We are teaching 
tomorrow's teachers," he says. 

Midwest Computer Camp, 9392 
Lafayette Road, Indianapolis, IN 
46278. (317) 297-2700. 

YMCA Camp Ralph Mason in 

Blairstown, New Jersey offers swim- 
ming, horseback riding, Honda bikes, 
canoe trips and programming on Atari 
and Apple computers for kids 8-16. 

YMCA Camp Ralph Mason, Route 3, 
Box 41, Blairstown, NJ 07825. (201) 
362-8217. 



CIRCUS AND COMPUTERS 

"Dear Mom: Having a great time. I 
learned PASCAL and C language in 
computer class. Yesterday, I did a 
double flip on the trapeze, then ate 
fire. Please send some more floppy 
disks. Love, Billy." 

This is a letter from a camp for the 
'80's. And yes, Billy really can learn 
how to eat fire at New England 



SUMMER 
COLLEGE 
FOR ALL 



Many colleges and universities also offer 
summer computer camps and workshops 
for the general public, in order to utilize 
idle campus computer facilities. Contact 
the extended education department of the 
university nearest you. It couldn't hurt 
to ask. 

The following colleges offer summer 
computer education instruction for teachers, leading to Educa- 
tion degrees. And all these campuses utilize Atari 800 computers: 

University of 
Wisconsin, Mad- 
ison; Western 
Washington Uni- 
versity, Belling- 
ham; Lesley Col- 
lege, Cambridge, 
MA; Fresno Pa- 
cific College, CA; 
and Barry University of Miami, FL. 




Computer Camp, located on the 
campus of an elegant Tudor-style 
boarding school surrounded by 
forest. 

"It all started with a counselor who 
knew how to juggle," says Camp 
Director Clark Adams, "then it just 
grew into a circus program that'll 
knock your socks off." Now NECC 
has expert trainers from the Flying 
High Circus of Florida Suite Univer- 
sity, complete with high-wire walk- 
ing. But the circus takes second stage 
to computing in Pascal, Assembly lan- 
guage, C, Forth, APL, LISP and explor- 
ing the HERO-1 robot. If you don't 
mind sending the kids to (horrors!) a 
non-Atari camp, or the $945 fee for 
a two-week session, this unique pro- 
gram might be the perfect balance of 
mental activity and non-competitive 
physical activity for your child. 

New England Computer Camp, 79 
Ringgold Street, West Hartford, CT 
06119. (203) 236-3473 



FAMILY COMPUTER 
VACATIONS 

There's one very good reason to com- 
bine computers with your next vaca- 
tion — if the computer instruction en- 
hances your work skills, the seminar 
portion of the vacation qualifies as a 
tax deduction. 

"This summer, don't just send your 
children to a computer camp. Come 
with them." So says the brochure for 
Family Computer Camp. Located 
on the 600-acre wooded campus of 
Clarkson University near the Cana- 
dian border in Potsdam, New York, 
this is one of the few camps that 
makes computing a family affair. 

"It's a good opportunity for a 
professional to learn a valuable job 
skill while enjoying a summer vaca- 
tion for the whole family," says direc- 
tor Estella Bray. Mom and Dad learn 
word processing, Lotus 1-2-3, and 
dBase-II on IBM-compatible Zenith Z- 
100 computers. Teenagers learn how 
to program in BASIC, with an empha- 
sis on graphics and game-writing 
technique, on Atari 400 and 800 com- 
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puters. Kids 8-13 learn graphics, BA- 
SIC and word processing on the 
Ataris. The little ones, 5-7, learn how 
to program in Logo on the Apple II 
and Commodore VIC-20. The in- 
structors are professional educators 
and engineers. 

A typical day includes six hours of 
class and computer labs and plenty of 
time to play volleyball, tennis and 
golf, enjoy the hiking trails and swim- 
ming pool, or go canoeing on the 
nearby St. Lawrence river. This sum- 
mer, there will be a field trip to a lo- 
cal music theater, and visits to the 
computer aided design/manufactur- 
ing and robotics laboratories at the 
university. But the most rewarding 
part of the experience, Bray says, "is 
getting three generations together." 
The week's tuition is $250 per per- 
son for the first two family members, 
and $190 for each additional member. 
The whole family can stay in a two- 
bedroom townhouse for an addi- 
tional $158. 

Family Computer Camp, Clarkson 
University, Potsdam, NY 13676. (315) 
268-6647 



ATARIS IN PARADISE 

Q: Why go to Club Med to use com- 
puters? A: Nobody says you have to 
use them. In four years, the comput- 
ing programs have become one of the 
star attractions at these famous inter- 
national beachfront resorts. The prac- 
ticality of combining a vacation with 
learning a skill seems to be espe- 
cially popular with Japaneese fami- 
lies. Each day, your most agonizing 
decision at Club Med will be whether 
to lie on the beach all day, or learn 
how to program an Atari 800 com- 
puter in BASIC. 

There are now eight Atari computer 
classrooms in Club Med villages: 
Eleuthera, Bahamas; La Caravelle, 
French Guadadeloupe; Ixtapa, Mex- 
ico; Marbella, Spain; Noumea, New 
Caledonia; African Village, Senegal; 
and Cherating, Malaysia. For informa- 
tion, phone (800) 528-3100. 



COMPUTER 



We wouldn't recommend touring 
Silicon Valley during the summer 
months (insufferably hot and smog- 
K I ■ I but the Lawrence Hall of Science, 50 

' miles to the north of Sunnyvale on the 

C III P V campus of the University of California, 

J IUI J Berkeley, is a great place to take the whole family. 

A computer and science museum of sorts, The 
Lawrence Hall of Science offers Atari computer 
courses all summer long. The eight-session courses cost $70. Kids 
from grades 5-7 learn color and sound. Grades 6-12 can take 
Computer Conversation, a speech synthesis class. Programming 
classes in Pilot are available for grades 4-8. The Lawrence Hall 
of Science also runs a highly acclaimed science summer camp 
tucked away in the beautiful coastal redwoods of California's 
Santa Cruz mountains. The Hall itself is open to the public every 
day from 10 am to 4:30 pm. Admission is $2.50 
for adults, $1.50 for children 7-to-18, senior 
citizens and students, and free for kids under 7. 
Phone (415) 642-5134. 

If you do find yourself in Silicon Valley, stop 
by the Computer Literacy Bookstore. This is the 
only bookstore in the country that specializes in 
literature on high technology and electronics. 
Wedged between a sandwich shop and an office 
supply store in the heart of a Sunnyvale industrial 
park, this little shop is packed floor to ceiling with 
over 15,000 volumes. 

There is a whole section of books applicable to 
Atari computers, and racks filled with every major computer 
magazine on the market. Co-owners Rachel Unkefer and Dan 
Doernberg who founded the store in March, 1983, provide a 
special ordering service. If you want a book they don't have, 
they'll track it down and mail it to you. 

Computer Literacy Book Shop, 520 Lawrence Expressway, Suite 
310, Sunnyvale, CA 94086. Mon-Fri 9:30 am to 8 pm. Weekends 
10 am to 6 pm. (408) 730-9955. 

You 've heard about public domain software, how about public 
domain hardware? The Future Center at Capitol Children's 
Museum in the heart of the nation's capitol is a 20-station com- 
puter classroom equipped with Atari 800s and a comprehen- 
sive library of software. Computer programs are available in 
BASIC, Logo and Pilot and are available to the general public. 

Capitol Children's Museum, 800 Third Street N.E., Washington, 
DC 20002. (202) 543-8600 
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BEST BUY ON 

SMALL QUANTITIES 

COLORED DISKS AS LOW AS 690 EA. - FLOPPY DISKS AS LOW AS 590 EA. 

Fully guaranteed. Includes sleeves and hub rings. DISKETTES (2 box minimum) 1 0 per box 



5%" 


Black Generic Bulk 


Colored Generic Bulk 


Bulk 


SS/DD 


DS/DD 


SS/DD 


DS/DD 


20-69 


.69 ea. 


.89 ea. 


.79 ea. 


.99 ea. 


70+ 


.59 ea. 


.79 ea. 


.69 ea. 


.89 ea. 



5 1 /4" 


Blk. Generic 


Colored Generic 


Bxs. (10) 


SS/DD 


SS/DD 


2-6 


8.90 


10.90 


7+ 


7.40 


9.90 



3 1 / 2 " 


Verbatim 


Sony 


Sony 


Bulk/Bx. (5) 


SS/DD 


SS/DD 


DS/DD 


20-69/2-6 


1.59 ea. 


11.90 bx. 


16.90 bx. 


70+/7+ 


1.49 ea. 


10.90 bx. 


15.90 bx. 



ATARI 520 ST 
HARDWARE 
CALL FOR PRICES 

Let us design a system for you! 

ATARI 520 ST SOFTWARE 

DP Master 39 

UNISON WORLD 

Printmaster 28 

VIP TECHNOLOGIES 

VIP Light 69 

VIP (Lotus 1-2-3 type) 89 

SST SYSTEMS 

Chat 17 

MARK OF THE UNICORN 

PC Intercom 84 

Final Word 99 

Hex 28 

INFOCOM 

Call for titles and prices 

HIPPOPOTAMUS SOFTWARE 

Hippo Computer Almanac ... . 25 

Hippo Jokes & Quotes 25 

Hippo ST Disk Utilities 37 

Hippo ST Ramdisk 25 

Hippospell 29 

Hipposimple 37 

Hippoart 29 

Hippobackgammon 29 

Hippoword 29 

Hippoconcept 69 • 

Hippopixel 29 

MICHTRON 

Utilities 45 

M-Disk 28 

Mudpies 28 

Soft Spool 28 

Flip Side 28 

Calendar 22 

Mi-Term 60 

Gold Runner 28 

Time Bandit 36 

BBS 34 

Holmes & Duckworth 

Tool Box 28 

Forth 34 

H&D Base 69 

OSS 

Personal Pascal 50 

METACOMCO 

Meta Pascal 79 

Lattice C 129 

Macro Assembler 60 

XLENT 

Typesetter 28 

Rubber Stamp Call 



EPSON PRINTERS 

FX-85 349 

FX-286 529 

STAR MICRONICS 

SG-10 229 

SG-15 399 

PANASONIC PRINTERS 

KX-1080 249 

KX-1091 199 

KX-3131 269 

PRINTER INTERFACE CABLES 

Microprint 39 

1 150 Parallel Int 49 

APE Face XLP 49 

U-Print A 59 

P:R: Connection 69 

Microbits Microstuffer 
(64K buffer) 65 

PRINTER RIBBONS 

Gemini Printers (Black) 4 

Gemini Printers (Blue/Red/ 

Purple/Brn./Grn.) 5 

Epson (80 Series) black 6 

Epson (Color) 8 

Panasonic Printers (Black). . . 11 
Panasonic Printers (Color) .. . 13 

MONITORS 

Thompson Color Comp 1 69 

Samsung Grn. or Amber 69 

Aspra Amber 59 

Monitor Cable 7 

MODEMS 

Atari XM-301 39 

MPP 1000 E 49 

Avatex (300/1 200 BAUD) ... 119 
Compuserve Starter Kit 24 

UPGRADES/ACCESSORIES 

Flip n" File 10 4 

Flip n' File 15 7 

Original Flip n' File 50 14 

Disk Bank/5 (Holds 50) 12 

Power Strip (6 outlet) 14 

Lineguard Spike Suppressor ... 13 

Disk Drive Cleaning Kit 9 

MicroMate Paper 

(20#, 540 sheets.) 10 

Printer Stand (wire) 16 

Dust Covers ... Call for availability 

Disk Coupler (notch) 6 

U.S. Doubler 49 

Omniview XL/XE Call 

Inland Surge Protector 

(6 outlet) 15 



ATARI SOFTWARE 

ATARI 

Atariwriter Plus 39 

Learning Phone 19 

Proofreader 14 

Silent Butler 19 

ACTIVISION 

Hacker 17 

Master of Lamps 17 

Great Amer. Road Race 17 

Star Bowl Football 17 

BATTERIES INCLUDED 

Paperclip 41 

Homepak 35 

B/Graph 28 

BRODERBUND 

Printshop 29 

Printshop Graphics Library 

1. 2 or 3 (ea.) 17 

Printshop Paper Refill 14 

Karateka 21 

Championship Lode Runner ... 21 

ELECTRONIC ARTS 

BUY ONE, GET ONE FREE • 
CALL FOR PRICES! 

EPYX 

Eidolon 28 

Koronis Rift 28 

Summer Games 27 

Ballblazer(D) 27 

Rescue on Fractalus (D) 27 

ICD 

U.S. DOUBLER 49 

Kyan Pascal 54 

INFOCOM 

Cut Throats (D) 23 

Deadline (D) 29 

Enchanter (D) 23 

Hitchhiker's Guide to 

the Galaxy (D) 23 

Sea Stalker (D) 23 

Starcross(D) 29 

Suspect (D) 27 

Suspended (D) 29 

Wishbringer 23 



300/1200 BAUD MODEM SPECIAL 

AVATEX 300/1200 BAUD MODEM - P:R CONNECTION - MODEM CABLE 
ALL FOR $179.00 



Witness (D) 23 

Zork I (D) 23 

Zorkllor III (D) 27 

Invisicules Hint Books 7 

MICRO-LEAGUE SPORTS 

Baseball 27 

Team/Player Disk 14 

Manager's Disk 28 

MICROPROSE 

Aerojet 24 

F-1 5 Strike Eagle (D) 23 

Solo Flight (D) 23 

Kennedy Approach 23 

Crusade in Europe 27 

Silent Service: Sub sim 23 

OSS 

Action (R) 49 

Action Tool Kit (D) 19 

Basic XL (R) 38 

DOS XL (D) 19 

Basic XE 49 

Mac 65 (R) 49 

Mac/65 Tool Kit (D) 19 

Basic XL Tool Kit 19 

ORIGIN 

Ultima III 39 

Ultima IV 44 

SIERRA ON LINE 

Ultima I 24 

Ultima II 38 

SSI 

Battalion Commander 27 

Computer Quarterback 27 

Kampfgruppe 39 

Objective Jursk 27 

Italian Commander 27 

Computer Ambush 39 

Rails West 27 

Colonial Conquest 27 

Panzer Grenadier 27 

Gemstone Warrior 23 

SUBLOGIC 

Jet Simulator Call 

Flight Simulator II 36 

SYNAPSE 

Syn-File + 34 

Syn-Calc 34 

Mindwheel (needs 2 drives) ... . 27 
Essex 27 

XLENT 

Megafont 17 

Page Designer 21 

Rubber Stamp 21 

Typesetter 28 




To order call TOLL FREE 

1-800-824-7506 



ORDER LINE ONLY 



COMPUTER CREATIONS, Inc. 

P.O. BOX 493 -DAYTON, OHIO 45459 
For information, order inquiries, or for Ohio orders (513) 435-6868 

Order Lines Open 9:00 a.m. to 8:00 p.m. Mon.-Fri.; 1 0a.m. to 4:00 p.m. Sat . (Eastern Standard Time). Minimum $ 1 5 per order. C.O.D. (add $3.00). Please specify computer system. Call 
toll free number to verify prices and availability of product. Prices and availability are subject to change without notice .We ship C.O.D. to Continental U S. addresses only! Please 
include 4% shipping on all Hardware orders (min. $4.00). Software and accessories add $3.00 shipping and handling in Continental U.S. Actual freight will be charged outside U.S. to 
include Canada Alaska, Hawaii, Puerto Rico and APO. Ohio residents add 6^% sales tax. Canadian orders add 5%shipping, (min. $5.00). All other foreign orders, please add 1 5% 
shipping (min $1 0) For immediate delivery send cashier's check, money order or direct bank transfers. Personal and company checks allow 3 weeks to clear. School purchase orders 
welcome Due to our low prices all sales are final. NO CREDITS. All defective returns must have a return authorization number. Please call (513) 435-6868 to obtain an RA# or your 
return will not be accepted for replacement or repair. FOR YOUR PROTECTION WE CHECK FOR CREDIT CARD FRAUD. We do not bill until we ship. 
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FORECAST THE WEATHER WITH YOUR ATARI 




Program by RICHARD STAERZL 
Article by CHARLES JACKSON 



You and your Atari can now forecast the weather with- 
out checking the newspaper or watching an obnoxious 
TV weatherman. Weather Wizard is a BASIC program 
ivhich works on all 8-bit Atari computers of any mem- 
ory size. 

Would you like to see more up-to-the-minute 
weather predictions than what's printed in your 
morning newspaper? Are you sick of your lo- 
cal TV weatherman's silly hats and awful jokes? 
Be your own weather forecaster. Just type in the latest 
wind direction, sky condition and two barometric read- 
ings. Weather Wizard and your Atari will do the rest, giv- 
ing you a delightful audio-visual reading. (If you don't own 
a barometer, you can obtain barometric data from your 
daily newspaper or a weather broadcast.) 

Type in Listing 1, WEATHER. BAS, checking it with 
TYPO II, and SAVE a copy before you RUN it. 

Weather Wizard asks you for the previous barometer 
reading, then the current barometer reading. It uses a pair 
of readings to determine whether the barometric pressure 
is rising or falling. The program accepts barometer read- 
ings between 28 and 31 inches of mercury. If you enter 
pressures which do not fall within this range, Weather Wiz- 
ard will buzz, give you a BAD DATA message, and let you 
try again. Otherwise, the program issues a mild "beep" 
and proceeds with the next question. 

Now, type in the elapsed time, in hours, between the 
two readings. If the last reading occurred a half hour ago, 
for example, you'd enter 0.5 as the elapsed time. Weather 
Wizard will not accept an elapsed time of zero hours. If 
you entered a zero, the program will ask you again for 
the elapsed time. 

Next, Weather Wizard will ask you for the current wind 
direction. Weather Wizard wants to know the direction 



IH 



the wind is coming from. In other words, if the wind 
blows your hat off, and the hat sails east, it's a west wind. 

No need to convert the wind direction into degrees. 
Weather Wizard accepts the standard N, S, E, W, NE, NW, 
SE and SW abbreviations. Just like an adventure game. 

Now, peek out the window and tell Weather Wizard 
the current sky conditions. You may choose between 
Clear, Partly cloudy, Mostly cloudy, Overcast and Rain. 
Type the appropriate letter and press [RETURN]. 

The hard part's over. Sit back, and Weather Wizard will 
present the forecast in a colorful graphic display, followed 
by a written forecast. At the top left of your screen, you'll 
see a drawing of a thermometer. Its color represents the 
temperature trend. A blue thermometer indicates a cool- 
ing trend, and a red thermometer represents a warming 
trend. 

Off to the right, you'll see a colorful icon representing 
the present forecast. The sun stands for fair weather, and 
a cloud foreshadows rain or snow. 

The bar graph in the center of the screen indicates the 

continued on next page 
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probability of precipitation. Finally, Weather Wizard prints 
a short forecast beneath the graphics display. 

If you have a printer connected and turned on, Weather 
Wizard will automatically make a hard copy of the 
graphics display and the forecast. Weather Wizard will 
work with any printer, even producing the graphics on 
daisy wheel models. 

HOW IT WORKS 

Weather Wizard bases its predictions on several simple 
forecasting "rules" which are fairly accurate for locations 
in the Northern hemisphere. For example, winds coming 
from the South indicate a warming trend, while North 
winds usually precede a cooling trend. The forecasting 
algorithms are in lines 230-430. 

EXPANDING THE PROGRAM 

For a few dollars and a spare set of paddle controllers, 
you can turn your Atari and Weather Wizard into an auto- 
mated weather station that senses the temperature and 
humidity. 

You'll need a thermistor (Fenwal Model GA45P2) to 
measure the temperature, and a particle sensor (Devry In- 
dustries Hygropak Model HA) to measure the humidity. 
These parts are available for a few dollars from most elec- 
tronics supply houses. 

We will connect the thermistor to paddle controller 0, 
and the particle sensor to paddle controller 1. Since both 
paddle controllers go through the same joystick port, it's 
easy to get them confused with each other. To tell 
PADDLE(O) from PADDLE(l), type in this short BASIC line 
and type RUN. 

10 ? PADDLE(0),PADDLE(1):GOTO 10 

Plug your paddle controllers into joystick port 1. Twist 
one of the paddle controllers while watching the two 
columns of numbers on the screen. The left column shows 
the values returned from PADDLE(O), and the right column 
shows the values returned from PADDLE(l). In other 
words, if the controller you're twisting is changing the 
values in the left column, you're twisting PADDLE(O). 
Otherwise, you're using PADDLE(l). 

Remove the two screws from the back of a paddle con- 
troller, and remove the plastic cover. Find the potentiom- 
eter (the round metal component in the center of the con- 
troller) and carefully cut and strip the two wires leading 
to it. Repeat this procedure with the other paddle 
controller. 

Connect the thermistor to the wires you cut on paddle 
(0), and connect the particle sensor to the wires you cut 
on paddle (1). Do not replace the plastic paddle covers. 
Finally, plug the paddle controllers into joystick port 1. 

It's easy to use your new weather sensors with Weather 
Wizard. Just change line 15 from SENSORS = 0 to 
SENSORS = 1, and hang your sensors out of the window. 

If you find that your temperature or humidity readings 
are not quite right, feel free to change the values of MTEMP, 
BTEMP, MHUM and BHUM in lines 16 and 17. MTEMP 
and BTEMP are used for changing the values from the ther- 
mistor into temperature readings. MHUM and BHUM are 



used for changing the values from the particle sensor into 
humidity readings. You'll need two accurate temperature 
and humidity readings to recalculate values for the cons- 
tants in lines 16 and 17. 

Let's recalculate our temperature constants, MTEMP and 
BTEMP (lines 16 and 571). For those familiar with 
mathematics, we're using the slope/intercept method to 
derive our formulas. 

We'll call our two temperature readings (as taken from 
a thermometer) TCOLD and TWARM. The formula for 
MTEMP is: 



TWARM 



— TCOLD 



+ 0.5 = MTEMP 



PEEK(624) warm — PEEK(624) cold 
and the formula for BTEMP is: 

BTEMP = TCOLD— MTEMP * PEEK(624) cold + 0.5 

You may use the same method to find the humidity 
constants MHUM and BHUM (lines 17 and 572). (But make 
sure you use PEEK(625) instead of PEEK(624)!) 

Industrious programmers may want to use the actual 
conversion formulas (lines 571 and 572) in their own pro- 
grams to build computerized thermographs, thermostats 
and systems to monitor and regulate plant growth. 

Weather Wizard will help you accurately predict the 
weather while you learn about meteorology 

Richard Staerzl is an Atari programmer from Fond du 
Lac, Wisconsin. Listing on pase 112 H 



A REVOLUTION IN FLYING - 




THE Mcrom^ JOYSTICK 

A unique product designed for use with FLIGHT SIMULATOR II to give 
you accurate and proportional control. Includes instant control Yoke, 
Throttle, Flaps, Brakes, Gun and Elevator trim. 
OTHER FEATURES: 

• Software program drivers for other Flight programs 
available soon 

• Use with User generated BASIC programs 

• Use with User generated assembly language programs 

MICROCUBE CORPORATION (703) 777-7157 

P.O. BOX 488 

LEESBURG, VA 22075 PRICE S 59.95 

Flight Simulator II is a trademark of Subiogic Corp. 
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Right 

Simulator n 





Put yourself in the pilot's seat of a Piper 181 Cherokee Archer for an awe-inspiring flight over realistic scene 
from New York to Los Angeles. High speed color-filled 3D graphics will give you a beautiful panoramic vie 
as you practice takeoff s, landings, and aerobatics. Complete documentation will get you airborne quickly 
even if you've never flown before. When you think you're ready, you can play the World War I Ace aerial battle 
game. Flight Simulator II features include ■ animated color 3D graphics ■ day, dusk, and night flying mode 
■ over 80 airports in four scenery areas: New York, Chicago, Los Angeles, Seattle, with additional scenery 
areas available ■ user-variable weather, from clear blue skies to grey cloudy conditions ■ complete flight 
instrumentation ■ VOR, ILS, ADF, and DME radio equipped ■ navigation facilities and course plotting ■ World 
War I Ace aerial battle game ■ complete information manual and flight handbook. 



See your dealer . . . 

or write or call for more information. For direct orders please add $1 .50 for 
shipping and specify UPS or first class mail delivery. American Express, Diner's 
Club, MasterCard, and Visa accepted. 

Order Line: 800/637-4983 
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Corporation 

713 Edgebrook Drive 
Champaign IL 61820 

(217) 359-8482 Telex: 206995 




SUPER HUEY 

America's #1 Helicopter Flight Simulator 

Forget the disappointment of other flight simulators . . . SUPER HUEY 
has eliminated them! - Commodore Power Play Magazine 
"One of the best flight simulators ever tested !" - Erv Bobo, Run Magazine 



Handles like a real 
helicopter. All your 
flying skill will be 
needed. 

FOUR 
ACTION-PACKED 
ADVENTURES! 

Solo Flight • Rescue 
Explore • Combat 
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Race against King Richard Petty and 
18 top drivers. A real life 3-D main 
event. 

Atari* • Commodore* 64/128"" 



Your skill as an archer can protect 
you from the giant spiders, snakes, 
dragons, frogs, phantoms and, 
finally, the demogorgon. 
Atari 0 • Commodore* 64/128'" 



where the action is! 

415 North Figueroa Street, Wilmington, CA 90744 
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BUSINESS DECISION ANALYSIS TECHNIQUES 



by JEFFREY SUMMERS, MD 



Think-tanks and major corporations often rely on com- 
puterized analysis techniques to help decide among com- 
plex alternatives. This tutorial article shows you how to 
use these principles to design your own 'decision tree." 
The accompanying BASIC program processes your de- 
cision tree calculations. The program works on all 8-bit 
Atari computers with minimum 48Kdisk or 32K cassette. 

Here's the problem. You are the CEO of MegaCorp 
and your multinational corporation wants to 
manufacture a product for marketing in the 
United States. Three sites are under considera- 
tion for the new factories. But each has its own advan- 
tages and disadvantages. 

The first site is here in the U.S. and the estimated profit 
would be 80 cents per item. The second site is in Coun- 
try A, where labor and other costs are lower — but insur- 
gent groups are fighting the government. Best estimates 
are that there is a 15% chance of a revolution. If there 
is a revolution, then there will be a 50-50 chance that the 
industries will be nationalized. If all goes well, the profit 
per item will be 87 cents. However, the profit will be 
reduced to 85 cents if there is a revolution without 
nationalization. If the industries are nationalized, then 
there will be no profits at all. 

The third site is in Country B, which has a stable govern- 
ment. But the U.S. is considering raising the tariff duties 
on merchandise imported from there. The profit per item 
will be 84 cents if the tariffs remain the same, 78 cents 
if the tariffs are raised. Your political analysts have deter- 



mined that there is a 20 percent chance of the change 
in tariffs. 

It's a tough decision! However, the technique of com- 
puterized decision analysis (CDA) allows for the calcula- 
tion of the best choice. If you have ever wondered how 
economists or political scientists use computers to simu- 
late and test alternate scenarios for future events, this 
article will introduce you to the concepts and techniques 
of CDA. 

Then after you learn how to design your own decision 
tree shells, you can use the accompanying BASIC program 
to process all the calculations needed to arrive at the most 
suitable decisions. 

This decision analysis technique uses a tree type of data 
structure. It is helpful to think of the decision "tree" as 
a roadmap. The diagrammed route is made of branches 
that are connected by nodes. These nodes are like forks 
in the road — where there is more than one path ahead. 
Branches are the labelled paths leading away from the 
node. A node has the same label as the branch which led 
to it. 



FIGURE 1 
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The three types of nodes are shown in Figure 1. A de- 
cision node represents a choice that you can control. 
("Should I manufacture in Country A, Country B, or the 
U.S.?") Decision nodes are indicated by squares. 

A chance node represents a path determined by factors 
beyond your control. For example, "Will there be a revo- 
lution in Country A?" Chance nodes are indicated by 
circles. 

Each of the branches leading from a chance node has 
an associated probability of being taken — as in a 20 per- 
cent chance of revolution. These probabilities are marked 
on the branches as they leave the node. 

A third type of node occurs at the end of each path 
and is therefore called a terminal node. The terminal node 
is indicated by a rectangle displaying its value, on any rele- 
vant scale. The possibility, "We'll make 87 cents profit per 
item if you decide to manufacture in Country A and all 
goes well" is an example of a terminal node. 

TREE DIAGRAM 

Figure 2 is a diagram of MegaCorp's multinational profit 
problem using the above symbols. You start reading this 
diagram from the left — that's the bottom of the tree. To 
begin with, you have the choice between three manufac- 
turing sites — the U.S., Country A and Country B. 



FIGURE 2 U-S. rrri Nationalized 

/ Z TakeiS > E D,. 

Production ,_ ,/ Country A % Not Matu red 
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The first alternative, manufacturing in the U.S., would 
lead directly to a terminal node. Nothing more needs to 
be considered if this option is chosen. Assign this termi- 
nal node a value of 80— the profit per item if you manu- 
facture our products in the U.S. 

The second alternative, manufacturing in Country A, 
has several other considerations. The first is whether or 
not a takeover occurs. You have no control over this, so 
you add a chance node and label its branches "Takeover" 
and "No Takeover." 

Further, the Takeover branch has a 50 percent proba- 
bility of industrial nationalization. So you add a chance 
node to the Takeover branch. This chance node has two 
branches, labelled "Nationalized" and "Not Nationalized." 
See the upper right portion of Figure 2. 

Country B faces the possibility of increased tariffs for 
imports into the U.S., which is also out of your control, 
so you add a chance node to this branch. The branches 



from this node are labelled "Rise in Duty" and "Duty 
Same." Each of these branches end in terminal nodes with 
profit values assigned as stated earlier in the problem (78 
cents per item if the tariffs are raised, 84 cents if the tariffs 
remain the same). We have now completed our tree. See 
the lower right portion of Figure 2. 



TREE SOLVING 

Now that you have this tree, what do you do with it? Es- 
sentially, you need to assign values to each of the nodes 
you have created, working all the way back from the 
"treetop" to the first decision node. The process of solv- 
ing the tree is governed by two basic rules: 

1. The value of a decision node is the maximum or 
minimum — whichever is more desirable — of all values in 
a pathway that goes away from it. 

2. The value of a chance node is the sum of the values 
of all branches that come from it, multiplied by their 
respective probabilities (pl*al + p2*a2, etc.). 

For example, if you decide to manufacture in the U.S., 
your profit would be 80 cents per item (shown in the path- 
way's terminal node). Since there are no chance nodes 
to complicate this calculation, the value of that pathway's 
decision node would also be 80. You must then repeat 
this process for any other alternative pathways leading 
from this decision node. 

Our sample problem has only one decision node, which 
makes it comparatively simple. If a problem has multiple 
decision nodes, we must solve and assign a value to each 
one. Thus, after solving each decision node we would as- 
sign it a "terminal node" value, while we continue to work 
our way back downward to the root decision node. 

Let's find the value of the decision node for the Coun- 
try A. Working backwards from the terminal nodes, you 
see that you'll make 87 cents per item if there is no 
takeover. And remember, there is an 85 percent chance 
of this happening. This branch has a value of (87) * (.85), 
or 73.95. 

If there is a takeover, there is a 50-50 chance of indus- 
trial nationalization. If the industries become nationalized, 
our profit-per-item is zero, and the value of the Nationali- 
zation branch is equal to (.5) * (0), or 0. If the industries 
do not become nationalized, our profit would be 85 cents, 
and the value of this branch would be (.5) * (85), or 42.5. 

Again, you'll only reach these branches if a takeover 
occurs. Since there is a 15 percent chance of this happen- 
ing, you add your Nationalized and Not Nationalized to- 
tals together (42.5 + 0) and multiply it by the probability 
of a takeover (.15) to find that the value of the Takeover 
branch is 42.5 * .15, or 6.375. 

Now, you add the value of the No Takeover branch 
(73.95) to the value of the Takeover branch (6.375) to find 
that the value of the Country A branch is 73 95 + 6.375, 
or 80.325). 

continued on page 26 
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USE other ware pix. Odd 16x16 
HI-RES PROPORTIONAL text. 
CONUERT other ware icons 
into TYPESETTER icons. 
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EXPAND /SHRINK 
ROTATE /MIRROR 
REFLECT- FLIP 
MULTI-FILLS 
ELLIPSE/BOX 
TRUE CIRCLE 
ICONIZE PIX 
16X16 FONTS 
48 TEXT SIZES 
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CONUERT ICONS 
AND MUCH MORE 
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DECIDE 
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By the same method, you find that the value of the 
Country B branch is 82.8. 

Now you have all the information you need to make 
a decision: 

Branch: Value 
U.S. 80 
Country A 80.325 
Country B 82.8 

Since you wish to maximize your profits, you should 
make the product in Country B. 

This problem has only 10 nodes, yet it takes a fair 
amount of time to calculate. What if you weren't sure about 
the chance of takeover? Would the decision change if the 
risk was only 10 percent? Five percent? Recalculating the 
tree for multiple probabilities would be tedious — and 
didn't you buy your computer to simplify these chores? 



The fifth node — branched from node 3 — is Country As 
Takeover node. It's a chance node with two branches and 
equal probabilities of .5 and .5. Label this node "Takeover". 

Node 6, again from node 3, is Country A's "No 
Takeover" node, a terminal node with a value of 87. 

Node 7 is a terminal node, coming from node 4 (Coun- 
try B). It has a value of 78. Label this node "Rise In Duty." 

Node 8, also from node 4, is another terminal node. 
Its value is 84, and is labelled "Duty Same." 

Node 9 comes from node 5 (Takeover) and is a termi- 
nal node which you will label "Nationalized." This node 
has a value of 0. 

Finally, node 10 comes from the same node as 9. and 
is another terminal node. It has a value of 85, and is 
labelled "Not Nationalized." The program now sees a com- 
pleted tree and returns you to the main menu. 



THE PROGRAM 

This program allows computation of trees up to 200 nodes 
in complexity, and allows quick recalculation of the tree 
with changed what-if values. 

Type in Listing 1, DECIDE. BAS, check it with TYPO 
II and SAVE a copy before you RUN it. 

To use this program for help with making your best de- 
cisions, you must first design your decision tree on pa- 
per. Assign values to each of the possible outcomes, and 
estimate the probabilities at each chance node. We'll use 
the MegaCorp problem example and the tree as outlined 
in Figure 4. 

Type RUN and choose the New Tree option to enter 
your tree. 

The program asks for the first node's type — decision, 
chance or terminal. Choose option 1 — decision. When 
asked for the number of branches leading from this node, 
respond with 3. The program can handle up to five 
branches from each decision node or chance node. 

Every node is labelled according to the branch, or path, 
leading to it. Since this is the first node, and has no paths 
leading to it, you'll arbitrarily label it "Production." 

You are then asked about node 2, (branched from node 
1). This node represents manufacturing the product in the 
U.S. Since it is a terminal node, choose option 3 and enter 
a terminal value of 80. Label this node "U.S." 

Node 3, also branched from node 1, represents Coun- 
try A, and should be labelled as such. (This is where you 
branch to the "Takeover" and "No Takeover" nodes). 
Node 3 is a chance node (option 2) with two branches. 
The probability of the Takeover branch is .15 and there- 
fore the probability of the second branch (No Takeover) 
is .85. 

Node 4, representing Country B, is the final branch from 
node 1. It is also a chance node with two branches. This 
time, the probabilities are .2 ("Rise in Duty") and .8, 
("Duty Same"). 



THE RIGHT PATH 

Save the tree by choosing the Save Tree option and then 
entering a legal filename. Later, you can recover the tree, 
with values intact, by using the Recover Tree option and 
entering the same filename. 

Now solve the tree. Choose the Solve Tree option and 
the program will ask you whether you want to maximize 
or minimize your results. Since you want the results to 
lead to maximized profits, select option 1. 

After a few seconds the main menu again appears. To 
see the results, choose the Print Tree option. Enter a legal 
filename or device at the "Output to:" prompt and the 
tree will be printed. You may print the tree to a disk file, 
to your screen, or to a printer. Using a printer makes the 
output easier to follow. 

Each node in the output is identified on the first line 
by its node number and label. The type and value are on 
the second line. The next line states where the node 
branched from. (The first node branched from node 0— 
the root of the problem.) The following lines list the 
branches from this node. Chance nodes give the proba- 
bilities of each of their branches. Terminal nodes have no 
branches and these lines are omitted. 

To see which branch should be taken at a decision node, 
remember that the optimum branch will always have the 
same value as the decision node. (This will be the highest 
value if you're maximizing, and the lowest value if you're 
minimizing.) In this example, you can expect an average 
profit of 82.8 cents per item by choosing Country B— 
node 4 matches node 1. 



EDITING THE TREE 

Choose the Edit Tree option and you can add branches 
and nodes, delete branches and nodes, change probabili- 
ties and labels. You are asked for the node number you 
wish to edit (entering a zero returns you to the main 
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menu). Perhaps you want to see if changing the probabil- 
ities of takeover would change your decisions. These prob- 
abilities are governed by node 3, the chance node labelled 
Country A. 

After typing a 3 you are given a sub-menu. Choose op- 
tion 4 to change the probabilities. You are given a list of 
the branches and probabilities from this node, then you're 
asked for the new probability of a branch to node 5. En- 
ter .10. (Thus, the probability of a branch to node 6 is .90.) 
Exit with option 0 and node 0, solve the tree again and 
print it. Does that change the decision? 

Try repeating the above steps to change the probabili- 
ties to .05 and .95. Now the decision changes to Country 
A. Testing your conclusion by varying the data you have 
the least confidence in can give you a better idea of the 
validity of your decision. This is called "sensitivity anal- 
ysis." Finding the point where the decision changes from 
one option to another is called "threshold analysis." In 
this case that point is where the probability of govern- 
ment overthrow is somewhere between 5 and 10 percent. 
If you feel ambitious you can try to find the exact number. 

Jeffrey Summers, MD is a practicing internist in Roches- 
ter, NY. He has been programming the Atari for three 
years and is interested in computer applications for 
medicine. 

Listing on page 105 ES 
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ECLIPSE 

1058 Marigold Court 
Sunnyvale, CA 94086 



NEW by JxL.. 
Axlon compatible 
RAMboards for Atari 
800s 

(XL & XE products also 
available. Send for info.) 

256K enough for 2 SD RAM 
Disks with RAM to spare 
$149 

512K holds 2 DP RAM disks 
and more $199 

1 MEG for those who need 
the MOST $349 

* All prices exchange for 
functional (with chips) 16K 
RAMboard with gold 
connectors.... otherwise add 
$20 

*★ To free slot 3 for 80 
column BD compatibility also 
include (A) a 32K BD and 
$10or(B)a16KBDand $30 
for modification 

Prices are subject to change without notice. 
Direct orders add shipping ($2.50 software, 
$4.50 hardware). CA orders add 7% sales 
tax. Allow 4 to 8 weeks for delivery. 



1 MEG RAM 

For8-BITATARJs? 



NEWTOP DOS 1.5 PLUS 

Especially great with Large RAMBoard Ataris 
(and all other Ataris!) 
•All the features of TOP DOS 1.5... Plus 
•Allows multiple RAM disks, SD or DD 

• Accesses ATARI DOS 2.5 files 

• Supports other RAM boards 

• New sector no. display, tone control 



and more! 



Only $39.95 



LIMITED OFFER $20 off TOP DOS 1.5 Plus when 
ordered with a JxL RAMboard 



And don't forget...TOP DOS 1.5 

•ATARI DOS.2 compatible 

• More powerful, more friendly than any other 
DOS 

• Handles 1 RAMDisk, AXLON, MOSAIC 
orXE 

•And still only $29.95 



And now, for those who qualify and need up to 
16 Megabyte disk capacity with sub directories 
and sector read, write & compare, file compare 
and MORE! 

We proudly announce the awesome 
TOP DOS PROFESSIONAL 

Available in limited quantities. Write for info. 

£1986 ECLIPSE. TOP DOS 1.5, TOP DOS 1.5 Plus, TOP DOS Professional are 
trademarks of ECLIPSE. JxL is a trademark of *xL Labs. ATARI & AXLON are 
registered trademarks of Atari Corp & Axlon, Inc. respectively. 
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ATARI 



A DIVISION OF MICRO PERIPHERALS, 
P.O. BOX 368 
KETTERING, OHIO 45409 



A 

ATARI 



ATARI 

520 ST's C'mon Now, Do It 1 

SF 314 Double Sided Drive 

SHD 204 20 Megabyte Hard Disk 

SC 1224 RGB Color Monitor 

130 XE (8-bit Wonder olthe World') 

65 XE 

1050 Disk Drive 

1020 Color Printer/ Plotter 

Power Supply 400/800/810 1050/850 
Power Supply 600/800 XL. 130 XE 

INDUS GT 

Power Supply for Indus GT 

PANASONIC 

KX-P1080 5 NLQ MODES! NEW 

KX-P1091 . Rated the No. 1 Printer' 
KX-P1092 80 col. True 180 cps 
KX-P1592 136 col. True 180 cps 
KX-P3131 L.Q. Daisy. 80 col 

KX-P3151 L.Q. Daisy, 136 col 

KX-P110 Ribbon. Blk 

COLOR RIBBONS 



CITIZEN 



MSP-10 
MSP-15 



289 
CALL 



EPSON 

LX-80 (80 col) 239 

FX-85 (80 col) 379 

FX-286 200 cps (135 col) 539 

STAR MICRONICS 

SG-10 (80 col) 229 

SG-15 (135 col) 429 

STAR SG-10 Ribbons 4 

MODEMS 

ATARI 1030 45 

XM-301 Direct Connect 38 

QMI 1200 ST (for 520 ST Complete') 179 

HAYES 1200 Smartmodem 399 

US ROBOTICS COURIER 2400-100% Hayes! 429 
PRENTIS P212ST-1200 bps. 100% Hayes! 239 

MPP 1200 AT 219 

V0LKSM0DEM 1200 199 

AVATEX Smart 1200 bps Special 119 

INTERFACES/BUFFERS 

ATARI 850 In Stock! 119 

P:R: CONNECTION (100% 850 compatible) . .66 

CABLES- We've Got 'Em CALL 

U CALL (For Hayes, etc.) 39 

U PRINT A 59 

U PRINT A-64 with 64K Buffer 99 

APE FACE XLP 59 

Supra/MPP MICROPRINT 39 

Supra/ MPP MICROSTUFFER (64K Buffer) 79 
Supra/MPP 1150 54 



SOFTWARE and BOOKS 

ST SOFTWARE TOO MUCH TO LIST CALL j 
ALL titles from: Haba, VIP, Broderbund. 
Mark of the Unicorn, Hippo, Unison World. 
Migraph, Oss, Infocom. Atari, Michtron. 
SST Systems, Mirage Concepts, etc 
We will have everything WORTH having! 

"THE C PROGRAMMING LANGUAGE" by 3 W 
Kernighan and D.M. Ritchie 19 j 

8 BIT SOFTWARE FOR THE LATEST CALL , 

PAPERCLIP 

PRINTSH0P 

GRAPHICS LIBRARY #1 . #2. or #3 (each) 
O S S. BASIC XE 
OSS BASIC XL 

MONITORS 

TEKNIKAMJ-10 Composite Color 1 
TEKNIKAMJ-22 RGB and Composite 2 
THOMPSON Green W/Audio 
THOMPSON Amber W/Audio 
THOMPSON Composite Color 1 
THOMPSON RGB/Composite 3 

ACCESSORIES 

ST- COVERS. Heavy Grade Vinyl 
ST- MOUSE MAT, Matching ST Color 
ST- 6' Printer Cable 
ST- Modem Cable (to Hayes, etc.) 
ST- Monitor Stand. Swivel & Tilt 
Disk File for 3.5" disks (holds 40) 
Flip N File DATA CASE (holds 50) 
Disk File, with Lock (holds 100!) 
Rotary Disk File (holds 72) 
Power Strip. 6 outlet. (15 amp Surge) 
Printer Stand. Heavy Duty, Sloping 
ATARI "Standard" Joystick 
6' Atari Serial I/O Cable 
Compuserve Starter Kit 
U.S. D0UBLER (Dbl. Density for 1050) 
"Duplicator" 1 

PRINTER SUPPLIES 

MAILING LABELS, White, 500 pack 
per 1000 

Blu. Pnk. Gn, Yel, 800 pack (200 ea) 

per 500, any 1 color 

per 1000, any 1 color 
Big Labels, 1-7/16x4". White, per 500 
PRINTER PAPER. Micro-Fine peris. 20 lb. 
500 sheets. Pure White Bond , 
1 000 sheets , same as above 
Carton (2600 sheets), as above 
PRINTSH0P "Rainbow" Color Paper Packs 
Pastels (5 colors). 50 sheets of ea 

Matching Envelopes. 20 of each 
Brights (8 colors). 50 sheets of ea 

Matching Envelopes, 20 of each 

ALL 13 colors, 50 sheets of each 

Matching Envelopes. 20 ot each 
(Deduct 10% for 100 /color paper packs) 



Prices Are Per Box of 10 DISKETTES Minimum Order of 2 Boxes 



No. of 
Boxes 


GENERIC 


BONUS 


WABASH 


3.5" MICRO-FLOPPIES 


SONY 


MAXELL 


VERBA'IM 


SS/DD 


DS/DD 


SS/DD 


DS/DD 


SS/DD 


SS/DD 


SS/QD 


SS/DD 


2-5 


8.50 


10.50 


10.50 


13.50 


10.50 


23 50 


21 50 


18 50 


6-10 


7.50 


9.50 


9.50 


12.50 


9.50 


21.50 


19.50 


17 50 



Rainbow Colored Centech Disks (2 ea of 10 colors per pkg) 17 

"Silver" Centech Disks (20 Pack) 17 



TO ORDER, CALL TOLL FREE 



\ M-F 9 am-9 pm • SAT 10 am-4 pm EST 
j #^J5T\ 0hj0 Residents Cal1 ( 513 > 294-6236 




TERMS AND CONDITIONS 

24 HR shipping on in stock items • NO EXTRA CHARGES FOR CREDIT CARDS' • Mm, mum order $20 • COD 10 
continental U S only add $3 • On.o residents add 6 5 c sales tax • Please allow 3 weeks tor personal or company 
checks to dear • Shipping/Handling Hardware. $4 minimum Software and most accessories S3 minimum t Over 
night shipment available at extra charge • We ship to Alaska Hawaii. Puerto Rico (UPS Blue Laoe' Onyi APO and 
FPO • Canadian orders, actual shipping plus 5 c -3 minimum $5 • An defective products reauire a return authorisation 
number to De accepted for repa r or replacement • No tree tnais or credit • Due to changing market conditions, can 
toll free tor latest price and availability of product 



June 1986 
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Expert Back-up for 

Atari Users. 




THE ST DUPLICATOR™ 

Our famous 1050 DUPLICATOR has 
been converted to service the ATARI 
520 ST. It is a software only disc copy 
system. 

You can now back up heavily copy- 
guarded and protected discs. Pres- 
ently, we can't find anything the ST 
DUPLICATOR will not copy. And if 
new forms of software protection 
should appear on the market, we will 
provide software upgrades. 



ST DUPLICATOR 

INCLUDES USER 
FRIENDLY SOFTWARE 
AND INSTRUCTIONS 



Plus -3.50 Shipping 
Add 7% Outside USA 



$5995 



SPECIALIZING IN BACKUP HARDWARE & SOFTWARE 



THE HACKER'S TREASURE CHEST On Disk 

18 Utility Programs on disk. Each pro- 
gram is specifically designed to aid you 
in backing-up your software collection. 
You will be able to duplicate disks, 
cartridges and cassettes. Any one pro- 
gram is worth the price of all 18. It has 
taken us over one year to put together 
this fine collection on the Hacker's 
Treasure Chest disk. Some of the 
programs you will receive are: 
Cartridge Copy, Bootape Maker, 
Tape to Disk, SectorCopy, The Un- 



protector, Sector Disassembler, Bad 
Sector Finder, Modem Program. ..plus 
more. All of these programs plus 10 
more on this disk. You will also receive 
a menu that will run basic and binary 
files just by typing the number of the 
program. Any file 
on any disk will 
load automatically 
from this menu. 
ALL FOR ONLY 



$3495 

Plus s 3.50 Shipping 
Add 7% outside U S A 



835, 1030 & XM 301 MODEM BULLETIN BOARD 

Function Message Base plus many 
more features. 

This package comes on a double sided 
disk, full documentation included plus a 
fully assembled and tested ring 



This BBS Bulletin Board System will run 
on any ATARI Home Computer includ- 
ing the XE No costly interface needed. 
All you will need is an 835 or 1030 
Modem and any disk drive (printer 
optional). Auto Answer feature will allow 
you to leave the BBS running unat- 
tended. This BBS has over 25 functions 
including: XMODEM Upload/Down- 
loading. User Passwords, Full 



detector. Nothing 
else will be needed. 
BBS software and 
ring detector. 



$7495 

Plus 5 3.50 Shipping 
Add 7% outside U.S.A. 



DENSITY "DOUBLER" 

1050 

DOUBLE THE POWER... 

TRIPLE THE SPEED... 

Get TRUE double density, full compati- 
bility with any DOS. Now store twice as 
much data on each disk. Read and 
write up to 3X faster in single or double 
density (Whole Track Buffering). 
Includes ultra-speed software, simple 
p I u g - i n P . C . 
board. No solder- 
ing or cutting 
required. 

For more info, on the density Plus s 3.50 Shipping 
cioubler refer to the 1 050 Add 7% outside U.S.A. 

Duplicator ad on opposite page 



$5995 



CART CLONE™ 

COPY ANY ATARI ™ CARTRIDGE 

A MUST FOR ALL ATARI™ USERS 
CART CLONE will backup and transfer 
any 8 or 16k cartridge to disk or tape. 
The contents of the cartridge will 
become a file which you can transfer, 
rename or delete. They will execute 
from DOS. No need to run a special 
menu or program to run these files. It 
goes in the left cartridge slot enabling it 
to work in all ATARI ™ Home Computers. 
Including the XL 
series. You can 
get CART CLONE™ 
with software for 



$5995 

Plus s 3.50 Shipping 
Add 7% outside U S A 



WRITE-RIGHT 

This device will allow you to write to 
side 2 of any disk. Install this box to 
your ATARI™ 1050 or Indus GT Disk 
Drives in 5 minutes. Just plug in one 
cable - no cutting or soldering required. 
Push a button and a LED will light, 
allowing you to write to a disk without 
notching out a hole in the disk. Easy 
plug-in installa- 
tion. Instructions 
included. Fully tested 
and assembled. 




2995 

Plus % 3.50 Shipping 
Add 7% outside U S A 

"Our competition promises tomorrow... 

DUPLICATING 
TECHNOLOGIES inc 



TELEGUARD 

Technical Breakthrough 

Truly a technological breakthrough! 
Now you can send any copy-guarded 
disk over the telephone lines by 
Modem. Of course, you must have our 
DUPLICATOR 1050 to send and receive. 
Teleguard will be 
available for 
delivery by April 1 st. 



$4995 

Plus s 3.50 Shipping 
Add 7% outside U S A 



We Deliver Today/ 



Formerly Gardner Computing 



Business Hrs. (516)333- 5805, 5807, 5808 



99 Jericho Tpke.. Suite 302A Jericho. N Y. 1 1 753 SK^Si*. (516) 333-5950 

TERMS: We accept American Express. Visa. MasterCard and COD orders Foreign orders must be in U S dolldrs All personal checks allow 14 days to clear Most items shippod within 24 hours 



The 1050 
DUPLICATO 
IS HERE... 



INCLUDES NEW 
niiTRA-SPEED SOFTWARE. 
PEAT? &VW/TE3X FASTER 
[ IN SINGLE AND 
DOUBLE DENSITY! 



T.M. 



THE 4050 DUPLICATOR: The most powerful 
diskdrive copy system ever developed for the ATARI. 




The only Copy System 
You will ever need! 

What will it do? 

► 777e main purpose of the Duplicator Is to 
copy disks I You will be able to copy just about 
any disk! The copies you make will run on any 
Atari drive. The Duplicator need not be 
present to run your backup copies. The 
Duplicator is fully automatic. You need 
only insert source and destination 
disks. Custom formats will be read 
and in turn reproduced on the 
backup copy disk. Our device 
will reproduce any custom 
format or heavily copy 
guarded scheme, bad 
sectors, double sectors. 
19 through 24 sector 
format will presen t no 
problem to the 
Duplicator. 



+ You will still have 
single density, density 
and one half, and double 
density. When you have a 
Duplicator installed in a 1050 
drive that drive will be turned 
into true double density. You will 
have twice the disk storage. Your 
drive will be compatible with other 
double density drives such as The Rana 
Indus. Percom, etc. 



High speed read & write. Your disk drive 
will read and load all of your software, 
saving wear and tear on your drive. 
The 1050 drive now reads one sector 
at a time. This is slow and ineffi- 
cient. With the duplicator 
installed you will be able 
to read eighteen sectors 
in the time it takes 
standard, unenhanc- 
ed drives to read one. 



Included with every 
Duplicator will be user 
friendly disk software. A 

simple, menu driven program 
will allow you to copy all of your 
software. A Duplicator enhanced 
drive will be a SMART drive. We plan 
to write many new and exciting pro- 
grams that can only be run on an 
enhanced drive, eg. sending a copy- 
guarded disk over the phone. Since the drive 
is now fully programmable, future upgrades 
can be made available to you on disks, should 
the need arise. No further hardware changes will 
ever be needed. The Duplicator comes with a full 
hardware and software guarantee. 



H4Q95 

■ M Plus $3 i 

■ ■ Arid 7<* 



HARDWARE POWER 



50 for shipping and handling. 
Add 7% outside U.S.A. 
N.Y State Residents add 7Vi% Sales Tax. 
' Dealer inquires are welcome call for quantity price quote. 



EASY 5 MINUTE INSTALLATION 

NO HARM TO YOUR DRIVE OR INCOMPATIBILITY PROBLEMS CAN EVER 
ARISE AS A RESULT OF THE INSTALLATION OF OUR DUPLICATOR. 



IMPORTANT: 

Only a hardware device like the DUPLICATOR can backup heavily copy- 
guarded disks. Don't be fooled by software programs that claim to do this. 

Fully Compatible with the XL & New XE Series. 




Our competition promises tomorrow... 
We Deliver Today! 

DUPLICATING TECHNOLOGIES inc. 

Formerly Gardner Computing 



99 Jericho Tpke.. Suite 302A Jericho, N.Y. 11753 Sft r e..H„.(516) 333-5805, 5807, 5508 22%S&i*(516) 333-5950 

TERMS: We accept American Exprets, Visa, MasterCard and C.O.D. orders. Foreign orders must be In U.S. dollars. All personal checks allow 14 days to clear. 
Most Items shipped within 24 hours. 



ELEGANT DESIGNS FROM SIMPLE EQUATIONS 



by MARIAN LORENZ and ALLAN MOOSE 




Artistic Mathematics draws a variety of stunning and 
intricate patterns based on sine waves. Your designs can 
be printed on a dot matrix printer or saved to disk for 
use with Micro-Painter graphics software. This BASIC 
program works on 8-bit Atari computers with 32 K mem- 
ory and a disk drive. 

To many, art interprets the beauty of nature while 
mathematics interprets nature's essence. What bet- 
ter place is there to join these concepts than your 
Atari keyboard? 
Armed with a few equations, you can easily create an 
infinite variety of intriguing patterns and colorful designs. 
The Artistic Mathematics program lets you use the equa- 



tions to plot colorful and intricate patterns on your screen. 
When you're done, you can print your pattern on a dot- 
matrix printer, or you can save your design on a disk and 
use it with Micro-Painter software. 

Listings 1 and 2 show you how to use the sine function 
for drawing artistic patterns on the screen that resemble 
landscapes. Listing 1 plots sine curves of random color 
and size, Listing 2 lets you design your own sine curves. 
Both listings let you print your favorite patterns on Epson 
or Star printers, or save them to disk for use with Micro- 
Painter graphics software. 

Type in Listing 1, MATHART1.BAS, checking it with 
TYPO II, and SAVE a copy before you RUN it. If you have 
trouble with the special characters in lines 46, 750 and 
830, don't bother typing them in. Listing 3 will create 
them for you. When you RUN Listing 3, it creates a disk 
file called D: LINES. LST which contains the above lines. 
Now, type NEW, LOAD Listing 1 and ENTER "D: LINES. 
LST". You may also use D: LINES. LST with Listing 2, 
MATHART2.BAS. Remember to SAVE your completed pro- 
grams before you RUN them. 

THE MATHEMATICS 

The sine function is ideal for generating many interesting 
and attractive curves. In fact, Fourier's Theorem states that 
any reasonable curve can be represented by the right com- 
bination of sine curves. 

If you've never worked with sine curves before, they're 
pretty easy to understand. All sine curves are based on 
circles. Let's try this simple visualization exercise. Imag- 
ine a clock with a second hand that is one meter long. 

continued on page 32 
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ro To , Winnie The Poo; 




ast night the blustery wind came up and 
mixed up everything in the Hundred Acre 
JLi Wood. If you can find the lost articles, 
like Pooh's honey pot and Eeyore's tail, and 
return them to their rightful owners, the 
characters in the Hundred Acre Wood will give a 
Hero Party in your honor! 

Children can play this adventure game over and 
over again, and never play the same game twice. 
The "Save Game" feature allows players to 
work on one game in more than one sitting. 

For ages 6 and up. 
Reading comprehension, logical thinking, map reading skills. 
For Apple II+/IIe/IIc, IBM, Atari ST, Commodore and Amiga. 

At software dealers everywhere... or call toll free 
800-423-5290 outside CA, 800-452-6000 inside CA. 



delightful graphics and an intriguing challenge. " 

- Compute! magazine 



1986 Walt Disney Productions 




SIERRA 



WINNIE THE POOH 

IN THE HUNDRED ACRE WOOD 




^SIERRA 



Look For Winnie The Pooh At These Fine Dealers: 



ALABAMA 
Basic Computers 
Huntsvllle 
205-881-6653 
Mel's Photo & 
Computer Shop 
Montgomery 
205-288-6220 

ARIZONA 



Baker Drug 

Little Rock 

501-565-0336 

Software Thomas Mall 

Phoenix 

602-952-0766 

Austin's Computers 

Phoenix 

602-841-4774 

Bookman's 

Tucson 

602-325-5055 

CALIFORNIA 
Consumer 

Electronics Store 
Anaheim 
714-635-8621 
Teddy Bear Toys 

& Computers 
Aptos 

408-688-6538 
Mid Cities 

Computer/Software 
Bellflower 
213-867-0626 
Personal 

Computers, Etc. 
Canoga Park 
818-883-5421 
The Floppi Disk 
Downey 
213-862-8188 
3E Software 

& Systems 
Hayward 
415-537-3637 



The Software House 

Fresno 
209-228-0579 
Lamar Micro 
Redondo Beach 
213-374-1673 
Ridgecrest 

Computer Center 
Ridgecrest 
619-375-4364 
D & G 

Computer Center 
Sacramento 
916-344-8666 
Warner Engineering 
San Diego 
619-294-4024 
Access To Software 
San Francisco 
415-751-2231 
San Jose Computers 
San Jose 
408-723-2025 
Quement Electronics 
San Jose 
408-998-5900 
Futurevision Computers 
San Luis Opisbo 
805-543-8444 
Learning Tree 
Santa Ana 
714-667-1575 
Software 1st 
San Rafael 
415-459-1475 
Software 1st 
Santa Rosa 
707-576-0972 
Computer Care 
Stockton 
209-941-8631 
Atcom Micro Center 
Thousand Oaks 
805-497-1220 



COLORADO 


HAWAII 


LOUISIANA 


The Computer Room 


The Computer Store 


Software Plus 


Aurora 


Hilo 


Chalmette 


303-696-8973 


808-969-1166 


504-277-9701 


The Computer Room 


Computer Station 


Software Center 


Englewood 


Honolulu 


Metairie 


303-799-9733 


808-942-7747 


504-885-2000 


Citadel Computers 






Colorado Springs 


IDAHO 


MARYLAND 


303-591-1700 


Basic Computer Center 


The Answer Store 




Boise 


Ellicott City 


CONNECTICUT 


208-345-3811 


301-461-2377 


Derric Electronics 


Digital Doohickeys 


Applied Computers, Inc. 


Hamden 


Idaho Falls 


Gaithersburg 


203-248-7227 


208-529-5830 


800-428-2747 


Eastern 




Compuvision 


Computer Video 


ILLINOIS 


Millersville 


Mllldale 


Software Plus 


301-987-0998 


203-621-8343 


Hanover Park 






312-837-6900 


MASSACHUSETTS 


FLORIDA 


Software Plus 


Instant Software 


Peripheral Vision 


Wheeling 


Boston 


Jacksonville 


312-520-1717 


617-353-1582 


904-723-3722 


Computerworld 


Computer Magic 


Cox Video 


Chicago 


Dennisport 


Lake Worth 


312-282-1575 


617-394-1566 


305-967-8895 






Rainbow 


INDIANA 


MICHIGAN 


Computer Center 


Computer Works 


Computers Today 


Orlando 


Carmel 


Holland 


305-894-2270 


317-848-0123 


616-399-8310 


Computer Chip, Inc. 


Bytrex Computers 


Micro-Link, Inc. 


Sarasota 


Fort Wayne 


Sturgis 


813-355-8448 


219-485-7511 


616-651-7631 


2004 The 






Computer Store 


KANSAS 


MINNESOTA 


Winter Haven 
813-293-9979 


Computer Connection 

Salina 


User Friendly 

Spring Lake Park 


GEORGIA 


913-825-2096 


612-786-8181 


Computer Things 


KENTUCKY 


MISSOURI 


Savannah 
912-354-3282 


Videovisions 

Louisville 


Instant Replay 

Chesterfield 


Computers 


502-425-2022 


314-576-0544 


Mean Business 


Tucker 






404-934-5295 







NEW HAMPSHIRE 
Noreast Computer Center 

Salem 

603-893-9140 

NEW JERSEY 
Software Station 

Rockaway 
201-328-8338 

NEW MEXICO 
Computer Stuff, Inc. 

Albuquerque 
505-292-8273 

NEW YORK 



RHT X-Ray Services 

Castleton 

518-271-3475 

CIA Software Center 

Flushing 

718-357-5522 

Leigh's Computers 

New York 

212-879-6257 

Leon's Computer Mart 

Rochester 

716-325-2787 

Video Computer Center 

Rome 

315-336-0266 

NORTH CAROLINA 
Ward Computers 
& Games 

Concord 
704-786-8815 

OHIO 

Electronic Connection 

Centerville 
513-435-8956 



OKLAHOMA 
Computers Unll 

Oklahoma City 
405-632-6007 

PENNSYLVANIA 
Toy Store & 
Computer Center 
McMurray 
412-941-2029 
Morgan's 
Computer Center 
Pittsburgh 
412-653-6150 
Computer Garden 
Plains 

717-823-4025 

RHODE ISLAND 
Software Connections 

Warwick 
401-738-3430 

SOUTH CAROLINA 
Concurrent 
Technologies, Corp. 

Travelers Rest 
803-834-9035 

TEXAS 



Smallcomp Systems 

Friendswood 
713-482-0890 
The Floppy Wizard 
Houston 
713-461-8660 
C.A.S.A. Computer 
Lubbock 
806-745-6991 

WASHINGTON 



Xanth Computer 
Systems, Inc. 

Seattle 
206-624-9292 



MATH ART 

continued from page 30 

This clock has a horizontal red line drawn between the 
3 and the 9. 

Watch the tip of the second hand. When the second 
hand points to the 9, its tip lies on the red line. Five sec- 
onds later, the tip is 0.5 meters above the red line. Five 
more seconds and the second hand points to the 10 — 
about 0.866 meters above our line. When the second hand 
points to the 12, it is at maximum height above the red 
line — one meter. As the second hand continues around 
the clock, the tip alternately rises above and falls below 
our line. If we graph this rising and falling, the result is 
a sine curve. 

Figure 1 illustrates a basic sine curve. Here, A is the 
amplitude (height) of the curve. In our clock example, 
the amplitude was the second hand's maximum height 
above the red line — one meter. 

The tip of the second hand circles the clock once each 
minute. Its period is equal to one. If we doubled the speed 
of the second hand, it would circle the clockface twice 
each minute, and its period would be equal to two cycles 
per minute. 



Figure 1 
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Y = A * SIN(X) 

But since a sine curve is so closely related to circles and 
distances, periods are measured in cycles per 360 degrees 
(length), instead of cycles per minute (time). The sine curve 
in Figure 1 has a period of one, while the sine curve in 
Figure 2 has a period of two. Note that we merely multi- 
plied X by two to get this curve. If we wanted a sine curve 
with a period of 100, we'd simply multiply X by 100 in- 
stead of two. 

If we multiply X by 0. 5, our curve would complete one 
half of a cycle in 360 degrees. Thus we can adjust the 
period, or length, of a cycle by multiplying or dividing 
X by some number. 

Figure 2 
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Y = A * SIN(2X) 





Figure 3 






Y = A * SIN(X+90) 
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We can slide our curves left and right by adding and 
subtracting numbers to X. Adding numbers to X will shift 
the curve to the left (see Figure 3), and subtracting num- 
bers will shift it right. 

The angle added or subtracted is sometimes called the 
phase angle. 

Notice that shifting the phase angle does not change 
the period or the amplitude. The shifted sine curve still 
completes one cycle in 360 degrees. 

In summary, the fundamental ingredients for produc- 
ing variety in the sine curve are: 

• Amplitude (Height) 

• Period (Length) 

• Phase (Shifting the curve left or right) 




THE PROGRAMS 

Listing 1 uses a random number generator to vary the 
amplitude, period, phase angle, color and placement of 
the sine curves. The sense of depth and texture is due to 
the random overlapping of curves and lines. Listing 2 lets 
you choose values for all of these parameters. 

Each time the program adds a curve to the screen, a 
window appears and asks you whether you want to [Q]uit 
the program, [P]rint the picture, [S]ave the picture in 
Micro-Painter format, or [C]ontinue adding curves to the 
screen. 

"Pop-up" text windows are used when you want to add 
and remove text windows without erasing the graphics 
on the screen. To add a pop-up window, just add 32 to 
the BASIC graphics mode number when you make your 
GRAPHICS call. In Listings 1 and 2, the variable GM 



32 



ANTIC, The Atari Resource 



represents this graphics mode number. (The statement 
GRAPHICS 7 + 32, for example, will add a pop-up text 
window to a Graphics 7 screen.) See line 355 in Listings 
1 and 2 for more examples of this technique. 

Similarly, we can remove the pop-up window by ad- 
ding 42 to the mode number. See line 420 in Listings 1 
and 2 for examples. 

Happily, pop-up text windows can be used with many 
types of modified display lists. 0ust remember to re- 
modify it after each GRAPHICS call.) Both Listing 1 and 
Listing 2 use a modified display list whenever they are 
RUN on a 400 or 800 series computer. 

If you own a 400 or 800 series computer, you've prob- 
ably gotten "cursor out-of-bounds" errors when using 
BASIC'S PLOT and DRAWTO commands on a Graphics 
7+ screen. We can solve that problem with two power- 
ful machine-language USR routines. 

The first machine-language routine (line 830) copies 
BASIC'S PLOT and DRAWTO routines from ROM into 
RAM. Once in RAM, the routine deletes the instructions 
which perform BASIC'S "out-of-bounds" checking. We use 
this modified routine in place of BASIC'S PLOT and 
DRAWTO commands. 

The USR routine in line 320 accesses our modified plot- 
ting routine, and is used in place of BASIC'S PLOT and 
DRAWTO commands. In this line, X and AXIS are the start- 
ing (X,Y) coordinates of the line to be drawn, and X and 
Y are the ending coordinates. 

Unfortunately, this routine does not work well with the 
XL-series Atari computers. 

SAVING YOUR WORK 

If you create a pattern you want to save, you can print 
it with the [P]rint option from the menu window. The 
screen dump routine (lines 400-730) is taken from the ar- 
ticle by Jerry White and Fernando Herrera (Antic, Janu- 
ary 1984). It has been modified to work with Epson, 
Gemini and Star dot-matrix printers. 

You can also save your picture for use with Micro-Painter 
software. Just choose the [S]ave option from the menu 
window. Each picture requires 62 sectors of disk space. 
You can use the Rapid Graphics Converter (Antic, 
November 1985) to convert this picture into almost any 
other format. 

Feel free to modify the equations in the program. You 
can mix and match sine curves to generate almost any 
mathematically defined curve. We leave it to you to 
explore many more of the possible combinations. 



Marian Lorenz leads a preschool program for handi- 
capped children in Central Islip. Allan Moose is an as- 
sociate professor of physics and mathematics at 
Southampton College. The two Long Islanders collabo- 
rated on a 6502 assembly language book which will be 
published shortly 
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WE 
GUARANT 

TO BEAT ANY 
ADVERTISED 
PRICE 



m ii i nn 

£ HARD 


SOFT 


f ST COMPUTERS 


DEGAS 


$ CALL 


$25 


130 XE 


H & D 4th 


$ CALL 


$65 


HABA 10 MGBYTE 


ZORK I 


$575 


$25 


HAYES 1200 MODEM 


CHECKMINDER 


$379 


$39 


CITIZEN MSP10 


HIPPO C 


PRINTER 


$39 


$265 






P/C INTERCOM 




$75 



CALL TO ORDER ALL SOFTWARE & 
HARDWARE AVAILABLE 

WRITE TO BE PLACED ON MAILING LIST 
FOR NEW PRODUCT INFO AND 
MEMBERSHIP 
P.O. BOX 3025 
N0RTHRIDGE, CA 91323 



NATL 
CALIF 
LOCAL 

YOUR 



1 (800) 423-3444 
1 (800) 424-3444 
(818)886-5486 



ALSO FEATURING 
ELECTRONIC MUSIC FOR YOUR ATARI 

All systems include all hardware, interface, 
cables. & user's manual with applications guide. 

/MIDITRACK 

MIDITRACK II (48K REQUIRED) $349.74 

MIDITRACK III (130 XE) 374.74 
MIDITRACK ST (520 ST) 574.74 
SESSIONS PLAYER PROGRAM INCLUDED FREE! 

CASIO CZ101 MIDI SYNTHESIZER CALL 
CALL FOR BUNDLED PRICES AND INFO. 
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CALCULATES THOSE INGREDIENT CHANGES 



Type a recipe into your Atari and 
Recipe Converter will calculate how 
much more of each ingredient you 
need for serving more people — or 
how much less you need for serving 
fewer people. Also converts decimal 
measurements to metric, and vice 
versa. The BASIC program will run 
on any Atari 8-bit computer with at 
least 48K and a disk drive. 

It's time for a big family feast and 
12 people are coming to dinner. 
But— oh no! Your favorite recipe 
makes only five servings and you 
need to scale it upward. 

Only three of you will be home 
next weekend and that same recipe 
is now too big. You need to scale it 
down. 

Or how about this? You just got a 
mouth-watering French cookbook for 
your birthday and you really want to 
try that Navarin Printanier — but all 
the ingredients are in metric! Just how 
many cups are there in a liter of heavy 
cream? 

These everyday problems call for a 
lot of scratch paper and a heavy-duty 
pencil. Or ... a computer. 

TYPING IT IN 

Type in Listing 1, RECIPE.BAS, check 
it with TYPO II and SAVE a copy be- 
fore you RUN it. 



by JAMES BROWN 

Easier said than done, huh? Okay, 
this is a pretty long program listing, 
but at least it doesn't have many 
strange characters. If you're a new- 
comer, take your time. Don't try to get 
it done all in one sitting. And be sure 
that every TYPO II code matches. Be 
careful to type the DATA statements 
exactly as shown, including spaces in 
the REM statements in lines 210 to 
255. Also, check to make sure you 
don't omit any program lines. TYPO 
II can't check for this. 

KEEP IT FRIENDLY 

In order to make Recipe Converter 
easy to use without digging out an in- 
struction manual and decimal conver- 
sion table every time you run it, a lot 
of attention had to be paid to the user 
interface. (This is called friendly pro- 
gramming.) 

For this reason, most of the pro- 
gram is dedicated to getting the infor- 
mation into the computer, and getting 
the results out. Only a small fraction 
of the code actually does any com- 
putational work. This is fairly typical 
of "practical" applications. You will 
find a lot of ideas in this program to 
help you write your own "user- 
friendly" applications. 

Instructions for using the program 
appear on the screen as you need 
them. The screen border color and 



sound cues tell you whether the 
screen is waiting for input, or contains 
only instructions, or displays an er- 
ror message. 

USING THE PROGRAM 

To use Recipe Converter you need a 
cookbook or other recipe source, a 
pencil and a sheet of paper. A printer 
is optional. You can save your recipes 
to disk and recall them later if you 
think you will need to "multiply" 
them again. 

Recipe Converter can scale recipes 
up or down by any reasonable 
amount. However, some recipes don't 
work well when increased by a large 
amount, so be careful. Also, cooking 
times do not scale easily, so you will 
have to use your experience here. 

Although all necessary instructions 
are in the program, let's step through 
an example. When the program is 
RUN, a colorful — and musical — title 
screen will appear followed by a 
screen describing the steps you will 
be going through to convert your rec- 
ipe. After reading the screen, press 
[RETURN] to continue. 

A second screen reminds you to 
search out all ingredients in your 
recipe — and, perhaps, label them 
with numbers. Press [RETURN] and 
you will be presented with your first 
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decision: Is your recipe in English or 
metric measurement? Or, maybe you 
previously saved a recipe to disk and 
now want to reload it. Those users 
who have never seen the program be- 
fore can type [H] for a HELP screen 
which will explain how to tell the 
difference between English and met- 
ric. Like we said, this is a friendly 
program. 

FRESH FRUIT 

Okay, now that you've seen how 
friendly it is, let's zip through a rec- 
ipe. We're going to take the following 
recipe for Fresh Fruit Salad, which 
serves six, and adjust it for 12 people. 
(We'll let you convert it to metric.) 
Some of the specific steps described 
below will make more sense once you 
actually have the program up and 
running. 

FRESH FRUIT SALAD 

2 peaches, skinned and pitted 

1 small melon 

3 apricots, pitted 

1 3/4 cups strawberries 

2 cups pitted cherries 

2 Tbsp sugar 

3 Tbsp orange juice 
3 Tbsp lime juice 

Press [E], for English measure- 
ments. Some instruction screens will 
show you what to do next. At the 
prompt, press [P] twice to enter 2 
peaches. At the next screen, choose 
[P] again, for "piece", since a peach 
is a unit. 

Now you may type in the descrip- 
tion of the ingredient. In this case, 
type PEACHES [RETURN]. A verifica- 
tion screen will appear with ingre- 
dient #1—2 piece of — PEACHES. 
Sounds strange, but it's accurate. 

All right, enter the rest of the ingre- 
dients in the same fashion. Our first 
three ingredients are units. When you 
get to the strawberries, choose cups. 
If you make a mistake entering, just 
press [N] when prompted. When all 
the ingredients are entered, press [Z] . 

We want to double our recipe, so 
we choose [M], then [Pj And let's 



look at it in English by choosing [E] . 
Each ingredient will be displayed on 
the screen, one at a time — both with 
the original count and the converted 
amount. If you don't have a printer, 
jot down the new amounts in your 
cookbook. (In some cases, an ad- 
justed recipe may call for a fractional 
amount — such as 1 3/4 eggs. Just 
round this off, or use smaller eggs.) 
Notice when you get to the straw- 
berries, you have a choice of equiva- 
lent cups, pints, quarts, and gallons. 
Choose whichever is more practical 
for you. 

After you have stepped through the 
entire menu, a new screen will appear 
with several choices. Those with a 
printer can print a hard copy of the 
same information that earlier printed 
to screen. This might be a good op- 
portunity to save your recipe to disk. 
(Don't forget to include D:.) 

PROGRAM TAKE-APART 

With the exception of a few short rou- 
tines at the end, subroutines start at 
line numbers ending in 00 and end at 
line numbers ending in 99. The vari- 
ous portions of the program are: 

100-142 Array declarations and defi- 
nitions. 

200-321 Data values for fractions, 
units, conversions, etc., plus note 
values for theme music. 

1000-1099 Main program. 

1100-1199 Initialization of arrays and 
constants. Line 60 disables the 
[BREAK] key (some people press it by 
accident because it is near the [RE- 
TURN] key). 

1200-1299 Display the title page and 
play theme music. 

1300-1399 Display introductory in- 
structions. 

1400-1499 Determine kind of input. 

1500-1599 Determine amount to 
multiply recipe by. 

1600-1699 Enter the ingredients for 
the recipe. 

1700-1799 Enter the quantity for an 
ingredient. 

1900-1999 Enter the units for an in- 
gredient. 

2100-2199 Display an ingredient. 



2200-2299 Enter the name for an in- 
gredient. 

2500-2599 Choose metric or English 
units for output. 

2600-2699 Display the converted 
recipe. 

2700-2799 Display all reasonable 
combinations of quantity and units 
which are equivalent. 

2800-2899 For English units, find the 
nearest fraction to the converted 
value. Approximations are used since 
cooking is not an exact science any- 
way. Decimals are traditionally used 
with metric units. 

2900-2999 Ending menu. 

3000-3999 Read a recipe from disk. 

3 100-3 199 Print a recipe, including 
conversions. 

3200-3299 Display a converted 
recipe. 

3500-3599 Save a recipe to disk. 

3700-3799 Check that all optional 
information, such as number of serv- 
ings and a title, has been specified 
prior to printing or saving to disk. 

4000-4099 Open a disk file. 

7000-7099 Change an ingredient. 

7100-7199 Enter an ingredient. 

8000-8099 Assorted prompting 
routines. 

8100-8199 Get a single letter and 
convert to upper case. 

8200-8230 Extend a string with 
blanks. 

8300-8399 Error handler for file 
open error. 

Miscellaneous technical goodies: 
INPUT #16,T$, in line 8014 waits 

for input without the "?" prompt. 
POKE 702,64, in line 8110 is the 

same as pressing [SHIFT] [CAPS]. This 

insures all input is in capital letters. 
POKE 694,0, in line 8115 shuts off 

inverse, again, to insure uniform 

input. 

James Brown is manager of the Com- 
puter Science and Applications Sec- 
tion of the Jet Propulsion Laboratory, 
California Institute of Technology in 
Pasadena. _ 
Listing on page 108 Lbj 
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Graphic Ar Is 

The Next Step in the €volution of Software 



Imagine combining the functions of 
Computer Rided Design (CRD), Bus- 
iness Graphics, free-hand drauuing, 
and typesetting programs into opk 
package. Include functions of^a 
simple spreadsheet for data ma 
ipulation. Rdd abilities of a simple 
word processor for text annotation 
in various fonts, sizes, and rota- 
tions. Mix all these features into a 
single package instead of "inte- 
grating" separate packages. The 
result is a new breed of softwai 
Graphic Arts. The only graphic arts 
program available: The Graphic 
Artist. 

The Graphic Artist is menu, macro, 
command, and language driven. 
Vou read correctly. Menus for begin- 
ners, commands and macros for 
experts. Rnd an optional language 
interpreter for creating custom 
applications. 

Support for dot matrix printers, 
color plotters, and laser printers is 
standard, of course. 

Impressed? Wait until you see a 
demo at a dealer near you! 




The Graphic Artist 

Graphic Arts has finally arrived, 

jmmmmmm progressive 

I J I computer ^language $245 additional 

LrL^JLT APPLICATIONS 

2002 McRuliffe Drive The Graphic Artist is a trademark of Progressive Computer 

Rodwille, Maryland 20851 Implications, Inc. 520ST is a trademark of Rtari Corp. 

(301)340-8398 




1. blah, blah, blah, blah, 
blah, blah, blah. 

2. blah, blah, blah. 

3. blah, blah, blah, blah, 
blah, blah. 

ENTER CHOICE 



A run-of-the mill 
online service. 



MODEM 
OWNERS: 

Tired of Text? 

Go for 
Graphics! 



What is an online service? 

An online service consists of a large, multiuser computer which 
your computer can access through the telephone lines. Since 
many people can access it at one time, you can interact and 
exchange information with other computer owners. 

How is GCP different from other online services? 

All other online services are out-growths of business information 
services. GCP was designed from the ground up to be a service 
for home computer owners. This means that GCP is easy to learn 
and fun to use. You can do everything you want with the joystick 
and function keys on your computer. 

In order to provide all these capabilities, we have implemented 
the entire system using full color graphics. GCP is set up as a 
City, with buildings for the Post Office, GCP offices, Games and 
other services. You, and the other customers, are figures which 
you move around in the City with your joystick. 

You mean the City is shown on my TV screen? 

Yes, indeed. Not only the City, but the inside of the buildings and 
the games are shown on your screen in full color graphics. 
Additionally, the other customers are shown on your screen as 
they move around the City and buildings. 

Isn't it slow downloading the graphics? 

No, because we do not download the graphics. All the pictures of 
the City, buildings and games are supplied on disk. When you go 
from one building to another, the graphics are accessed at disk 
drive speeds. 

Do I need special software? 

Yes, very special. But don't worry, we provide it with your 
signup. 

Can I download public domain programs? 

Yes, GCP has a public domain archive in its Post Office with 
about a Megabyte of Atari programs you can download. 

What games do you have? 

At the moment, we have BioWar, CyberTank and CyberShip. 
Lords of Space is under development and may be done by the 
time you read this. All the games are played online against other 
customers, so you are matching wits with humans from all over 
the country. 

BioWar is a multi-player adaptation of Conway's game of Life. 
Each player has a cell colony which he tries to expand, often at 
the expense of the other players, while contending with the 
problems of under- and over-population. 

CyberTank and CyberShip are tactical design and combat games 
set on the CyberWorld, an artificial battleground for cybernetic 
machines. You design your own tank or ship and battle it out 
with up to 15 other players on a scrolling map. 

Do the games use graphics also? 

Extensively. For example, in CyberTank, when you design your 
tank, the hull is shown on the screen, as are all the equipment 




GCP: the only online 
service combining interactive^ 
graphics with electronic mail, 
downloads, AND games! 

choices, in full color graphics. You select and place the items by 
using your joystick. 

In the combat phase, your screen shows the status of your 
tank, the 1 mile area around your tank (only a part of the larger 
battlefield), and any enemy tanks inside that area. 

What equipment do I need? 

GCP supports any member of the 8 bit Atari line with 48K of 
memory. You will also need a disk drive and a modem. We 
support all the available modems for the Atari. 

How much does it cost? 

The signup kit includes the software and documentation you need, 
plus 5 free hours at standard rates. This kit costs $30. After the 
free hours are used up, the standard rates are $6 per hour 
(weekday evenings after 6pm local time and all day Saturday and 
Sunday) for either 300 or 1200 baud access. Daytime hours 
during the week are $15/hour. 

Is it a long distance call? 

Not from most U.S. cities. GCP is accessed through Tymnet, 
a national data service with over 500 locations in the U.S. The 
Tymnet charges are included in the standard rates, so you don't 
have to worry about add-on charges. 

How do I sign up? 

Just fill out the information requested below and send it to us 
with your credit card number or check/ money order. For faster 
response, call us at: m m mQ ^ 

and give us your logon name, password and credit card number 
over the phone. 

Logon name (letters/numbers only) 
[hint: keep it short] 

Choices: 



1st I L 



J L 



J L 



J I I I L_J 



2nd I I I I I I I I I 



J I I L 



3rd I I | L 



J I I I I I I l l I 



Password (must be 6-10 chars): 

I I I I I I I I I I I 



GAMES 
COMPUTERS 
PLAY, INC. 



112 East Market Street, York, PA 17401 
717-848-2660 (VOICE) 



Nothing complements a great 
computer better 



MajRoom 



HABAWRITER 
MAIIMERM 
imUTY 



aw****' 






HOW TO 
MANAGE YOUR 
CHECKING 
ACCOUNT 
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than powerful, dynamic software. 

Haba Systems is proud to offer one of the most extensive lines of applications and personal 
productivity software for the 520ST™one of the most amazing pieces of computer hardware to 
come along in recent memory. 

HabaView™ —a new dimension in data management for your ST. HabaView's foundation is 
based on a 100% intuitive GEM ™ user interface and state of the art file management. With 
HabaView, your data will never look the same. 

HabaWriter ™ —a full-function word processor, featuring multiple windows for simultaneous 
multiple document editing, pull-down menus and advantageous use of the mouse, meaning 
never having to learn cryptic commands again. The word processor your ST has been waiting 
for. 

Habadex PhoneBook™ —the elegant way to store and dial* phone numbers. Long distance 
services like MCI and Sprint can also be dialed so you don't have to. The PhoneBook can sort 
on any field, is versatile enough to handle other types of information and can even print 
labels. 

Other titles for the 520ST include HabaCheck™ , a personal financial management program, 
Haba Mail Room™ , an answer to your mailing list needs, HabaMerge™ , a mail-merge type 
utility, Solutions: Wills™ and Solutions: Business Letters™ 

By the way, if your reading this and you don't have a 520ST, what's your excuse? 

'automatic dialing feature requires the use of a HabaModem m or any Hayes " compatible modem. 




6711 Valjean Avenue 
Van Nuys, CA 91406 
(818) 989-5822 • (800) 468-4222 • (800) 367-4222 (Cal. only) 

520ST is a trademark of Atari Corp. HabaView, HabaWriter, Habadex PhoneBook, HabaChcxk, Haba Mail Room, HabaMerge, Solutions: Wills, Solutions: Business Letters and HabaModem are trademarks of Haba Systems, Inc. GEM is a trademark of 
Digital Research, Inc. Hayes is a trademark of Hayes Microcomputer Products, Inc. 



PERPETUAL CALENDAR 1900-2100 



by CHARLES POSTLE 



Did you ever want to know bow 
many days old yon are? This com- 
puterized Julian perpetual calendar 
tells you exactly how many days ago 
a specific event happened. You can 
also see a screen display of any calen- 
dar month between March 1900 and 
February 2100. The BASIC program 
works on all Atari 8-bit computers 
of any memory size, with disk or 
cassette. 

The Egyptian astronomer, 
Sosigenes, suggested to Julius 
Caesar in the year 46 BC that 
the calendar currently in use 
was a little out of step with the natu- 
ral year. The natural year was actually 
365.25 days long instead of 365. The 
solution, said Sosigenes, was to cre- 
ate a "leap" year every four years. And 
SO it came to pass. 

Some time later, it was discovered 
the 365.25-day year is just about 0.01 
days too long. Rather than lose sleep 
over this, the great thinkers of the day 
brought our calendar up to date in the 
year 1900. It was felt that no more 
corrections would be needed until 
2100. 



Micro Julius is a computerized per- 
petual calendar with bells and whis- 
tles. It bases its calculations on the 
365.25-day Julian Year. Since only 
dates between March 1, 1900 and Feb- 
ruary 28, 2100 can be figured using 
this method, there are limits to this 
program. {Look for an update of 
Micro Julius in the February, 2100 is- 
sue of Antic-AHJ\C ED) 

USING IT 

Type in Listing 1, JULIAN. BAS, check 
it with TYPO II and SAVE a copy be- 
fore you RUN it. Micro Julius will first 
ask you for a date, in this order: 
Month, Day, Year. If, for example, you 
want to enter today's date as May 15, 
1986, type: 5,15,1986 [RETURN]. 

The full date will be printed to the 
screen as May 15, 1986 THURSDAY. 
After a brief pause, a menu will ap- 
pear with several options. 

First, you may enter another date 
to find out the difference in days. 
Want to know how many days old 
you are? Let's say you were born Oc- 
tober 5, 1959, Choose selection 1 and 
press [RETURN]. Type 10,5,1959 
[RETURN]. If all is going well, you 



should discover that you are 9719 
days old. 

Selection 2 lets you subtract a 
number of days from the first date you 
entered. Exactly 250 days from May 
15, 1986 was Saturday, September 7, 
1985. Numerologists may wish to 
apply their magic numbers to this 
function. 

Going on a 90-day diet? Well, if you 
start it on May 15, 1986, you can cel- 
ebrate with a binge on Wednesday Au- 
gust 13. Use Selection 3 to add a num- 
ber of days to your first date and mark 
the result on your calendar! 

Selection 6 draws a page of the cho- 
sen month to the screen — labelling it 
appropriately and highlighting the 
given day. 

JULIAN'S DAY 

In programming, any math done with 
dates can be greatly simplified by first 
converting the date to what's known 
as a 'Julian day number". This is the 
date, chronologically numbered from 
some known starting point. The con- 
version in Micro Julius takes place in 
lines 120 through line 170. This result- 
continued on next page 
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ing number can now be treated like 
an integer in math problems. 

Once the day number has been 
mathematically massaged, it can be 
reconverted back to a date again. 
Lines 180 through 270 do the recon- 
version. Note lines 130 through 150 
and lines 220 through 270. Since the 
extra day in a leap year is added to the 
month of February, these lines distort 
the calender year to look as though 
it ends in February. Lines 290-310 fig- 
ure the day of the week. 

Menu Selection 1 allows a second 
date to be entered. This second date 
will be converted to a Julian day and 
the absolute values of the two days 
subtracted. The result is the number 
of days between the two dates. Line 
650 performs this task. 

Menu Selection 2 subtracts a num- 
ber of days from the date first entered. 
Line 730 takes care of this, after which 
the program reconverts the result 
back to a new date in the subroutine 
at line 180. 

Menu Selection 3 adds a number of 
days to the date (line 760) and again 



reconverts the result to a new date 
(line 180 subroutine again). 

Selection 4 starts the program over 
so you can begin with a new date (line 
780). Selection 5 ends the program. 

ENTER GRAPHICS 

To draw a calendar page (Selection 6), 
the program first finds out on what 
day of the week the month starts. This 
is done in lines 800-830. Then the 
program finds the Julian day number 
for the first day of the following 
month. Subtracting the two day num- 
bers tells the program how many days 
are in the month in question. This is 
done in lines 850-890. 

Lines 900-950 assign the days of the 
month to A$ string and make sure any 
previous assignments are blanked out. 
Lines 960-980 change the date to be 
highlighted into inverse video. 

The CS string is the actual calen- 
dar that will be printed. Lines 1040- 
1090 put the day-of-week symbols 
into the first week. These will be over- 
written by any day of the month that 



falls coincidentally in the same space. 
Lines 1130-1150 match the days of the 
month (A$ string) to the calendar (C$ 
string). 

The program is written to display 
the calendar page to the screen only 
(Lines 1160-1420). Printer output 
would be an interesting addition but, 
since printer graphics vary so widely, 
I leave this task to the reader. 

I've tried to make the program as 
easy to use as possible. However, I 
might caution the reader that these 
calculations should not be used to fig- 
ure financial interest and payments, 
because many banking institutions 
use a 30 day month and a 360 day 
year to calculate these matters. 

Charles Postle is a construction su- 
perintendant in the Las Vegas area. 
He writes much of his own software 
in BASIC. 

Listing on page 104 Q 



THE LOWEST 
PRICES 
THE BEST 
SERVICE 



ELECTRONIC ONE* 

CALL f 6 1 4 J 864-9994 P.O. Box 1 3428 • Columbus. OH 43213 



PHONE 

LINES 10-6 E.S.T. 
OPEN M — F 



ATARI COMP. HARDWARE 

65XE 79.99 

800XL 89.99 

130XE 119.99 

DISK DRIVES 

ASTRA (THE ONE) 249.99 

INDUS. G.T 199.99 

CENTURIAN(810) 169.99 

ATARI 1050 DISK DRIVE 124.99 

PRINTERS 

STAR S.G. 10 219.99 

STAR S.G. 15 379.99 

PANASONIC 1080 199.99 

PANASONIC 1091 229.99 

EPSON LX80 219.99 

TRACTOR (LX80) 24.99 

ATARI 1027 79.99 

ATARI 1025 139.99 

ATARI 1020 19.99 

ATARI XM801 189.99 

SEIKOSHA 189.99 

INTERFACES 

MPP MICROPRINT 34.99 

U PRINT 49.99 

APE FACE 49.99 

MPP 1050 49.99 

XETEC 44.99 

MONITORS 

SAKATA 13" COLOR 139.99 

COMMODORE 1802 179.99 

THOMPSON 14" 159.99 

TEKNIKA MJ10 179.99 

NAP GREEN W/SOUND 79.99 

ATARI HARDWARE ACCESSORIES 

US DOUBLER 49.99 

1030 MODEM 44.99 

XM301 MODEM 39.99 

MPP 1000E MODEM 49.99 

850 INTERFACE 119.99 



ATARI COMPUTER SOFTWARE 



ENTERTAINMENT 

PACMAN 4 

STAR RAIDERS 4. 

ASTEROIDS 4 

QIX 4. 

KABOOM 4. 

PITFALL 4. 

MEGAMANIA 4. 

Q-BERT 6. 

POPEYE 6. 

FROGGER 6. 

DIG DUG 9. 

MOON PATROL 9. 

FOOTBALL 9. 

BASKETBALL 9. 

ROBOTRON 9. 

ONE ON ONE 23. 

MOVIEMAKER 23. 

KATATEKA 18. 

HACKER 18. 

CROSSCOUNTRY 18. 

BLUE MAX 2001 18, 

KORONIS RIFT 22. 

THE EIDOLON 22. 

RESUCEONFRACTULUS 22. 

UTILITIES 

PAPERCLIP 34. 

ATARI WRITER 19 

ATARI WRITER PLUS 34. 

PROOFREADER 14 

VISICALC 14. 

HOME FILE MANAGER 14 

SILENT BUTLER 19, 

LOGO 32 

MICRO SOFT II 24, 



MPP 

SPECIAL 1000E 

MODEM 



ENTERTAINMENT 

,99 POLE POSITION 9.99 

,99 MS. PAC MAN 9.99 

.99 JUNGLE HUNT 9.99 

,99 JOUST 9.99 

.99 MILLIPEDE 9.99 

,99 CENTIPEDE 9.99 

.99 PENGO 9.99 

,99 DONKEY KONG 9.99 

.99 DONKEY KONG JR 9.99 

,99 TRACK & FIELD 14.99 

.99 FINAL LEGACY 14.99 

,99 EASTERN FRONT 14.99 

.99 STAR LEAGUE BASEBALL 14.99 

,99 STAR BOWL FOOTBALL 1 4.99 

.99 STRIP POKER 19.99 

99 F-15 22.99 

,99 KENNEDY APPROACH 22.99 

99 SOLO FLIGHT 22.99 

,99 MICRO LEAGUE BASEBALL .... 24.99 

99 COMPUTER FOOTBALL 22.99 

,99 ZORKI 22.99 

99 ALL INFOCOM 26.99 

,99 BASIC CART 7.99 

99 HOMEPAK 27.99 

PRINT SHOP 27.99 

,99 ASSEM/EDITOR 19.99 

,99 MACRO ASSEM 19.99 

,99 MUSIC PAINTER 15.99 

,99 SYN FILE 29.99 

,99 SYNCALC 29.99 

,99 SYN TREND 23.99 

,99 BASIC XL 34.99 

.99 BASIC XE 46.99 

.99 B-GRAPH 26.99 

ULTIMA IV 39.99 



520ST ATARI S.T. 

COLOR 788 00 

W/SOFTWARE 

JT SOFTWARE 

VIP PROFESSIONAL 99.99 

HIPPO E 49.99 

FORTH 59.99 

ALL INFO COM 29.99 

CHAT 15.99 

EXPRESS 29.99 

HABA WRITER 49.99 

HEX 21.99 

SUN DOG 25.99 

ULTIMA II 36.99 

RHYTHM 34.99 

BUSINESS LETTERS 29.99 

OSS PERSONAL PASCAL 49.99 

KINGS QUEST II 32.99 

SPINNAKER MATH 19.99 

PERRY MASON 32.99 

FAHRENHEIT 451 32.99 

TYPESETTER 25.99 

TRANSYLVANIA 23.99 

HABA HARD DRIVE 689.99 

HABA 300/1200 MODEM 149.99 

PRINTER OR MODEM CABLES .24.99 



$37.99 



DISKETTES 




MAXELL SSDD 


1 1 .99 


PERCISION D/S DID 


. . . .9.99 


BONDS D/S DID 


8.99 


BASF S/S DID 


999 


CENTECK COLOR S/S DID . . 


. . .7.99 


JOY STICKS 




ATARI 


6 99 


PADDLES 


12.99 


SPECTROVIDEOII 


.... 7.99 


SPECTROVIDEO I 


. . . .5.99 


KRAFT 


7.99 



HOW TO ORDER: CASHIER CHECK, MONEY ORDER, MASTERCARD* OR VISA* 
(ADD 4% FOR CHARGE CARDS) ... NO PERSONAL CHECKS ... NO C.O.D.'s . . . 

SHIPPED U.P.S ALL PRICES SUBJECT TO CHANGE WITHOUT NOTICE. 

SHIPPING: ADD $3.00 ON ALL ORDERS UNDER $100.00 . . . ADD $5.00 ON ALL 
ORDERS OVER $100.00. ACTUAL FREIGHT CHARGED ON MULTIPLE ORDERS. 



INTERNATIONAL: ACTUAL FREIGHT CHARGED ON ALL ORDERS OUTSIDE THE 
CONTINENTAL UNITED STATES INCLUDING A.P.O. 

POLICIES: NO RETURNS WITHOUT A RETURN AUTHORIZATION ... NO 
RETURNS UNLESS DEFECTIVE. ALL DEFECTIVES WILL BE EXCHANGED. NO 
EXCEPTIONS. 
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ANTIC, The Atari Resource 



WORD FOR WORD 

A crossword game for the ATARI 



You can play WORD FOR WORD on a game 
board that looks like this, or you can create your 
own! Drop-down menus make it easy to design 
the shape, size, and layout of the 
game board. Other features let 
you assign letter values, select a 
skill level, and challenge words. 

When the game board is the 
way you want it, invite up to three 
friends to play. And you can 
include Alphie (your computer) in the game. He 
has a 20,000 word vocabulary that is sure to chal- 
lenge and improve your skills. The choice is 
yours and the options are almost endless! 
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To Order 

Contact your Atari ST dealer, or 
send $39 95 plus $3.50 for 
shipping and handling. ($43.45) 
California residents add $2.40 
sales tax. ($45.85) 

MasterCard or Visa accepted 



Bay View Software 

177 Webster St., Suite A-295 
Monterey, Calif. 93940 
(408) 373-4011 



Works with color (medium resolution) or monochrome monitor. 

WORD FOR WORD is a trademark of Bay View Software 



Now you can £*^S 

with the new 
Magna 256K RAM-Board 

• Enhanced memory capabilities 

• Simple plug-in installation 

• 100% Axlon® compatibility 

• 288K available with Synfile + ™/Syncalc™ 

• Up to 1 million bytes on a single board 

• Up to 8000 sectors available as a Ramdisk 

• Perfect for B.B.S.'s 

• AAYDOS™ Ramdisk software included 

RAMCHARGER 256K $149.95 

RAMCHARGER 512 K $199.95 

RAMCHARGER 1 MEG $299.95 

Terms: Check. Money Order. COD 
Add (4.50 shipping & handling. 
New York Residents add 8 r / 4 % sales tax 

MAIL TO: 
MAGNA SYSTEMS 
147-05 Sandford Ave. Suite 4E 
Flushing, N.Y. 11355 
Phone: 718 939-0084 



Magna 
Systems 

"We build power." 




SOFTWARE'S NEW LINE-UP!! 



Pascal Products for the Atari Family ..... 

kyan pascal for the Atari $69.95 

kyan pascal is a DOS 2.5 based compiler for the Atari 800/1200XL and 130XE. It's a full Jensen-Wirth and designed 
for both beginning and advanced programmers. It's easy to use, lightning fast, and loaded with features like: 
■ Optimized 6502 machine code compiler ■ Full screen text editor ■ String handling and Atari graphic support, 
■ Source code linking, chaining, and random files, ■ Built-in assembler for inline or 
included assembly source code, and ■ Complete tutorial/reference manual. 
kyan pascal comes on a non copy-protected, single density disk and requires only 64K of memory. 

kyan pascals' New Line-Up 

Programming Utility Toolkit $49.95 

Makes pascal program development faster and easier. This 
toolkit includes utilities to generate random numbers, load 
binary files, sort lists, control screen and cursor functions, 
and more. It also includes utilities for disk directories, cata- 
logues, and other file management functions. 
(Available 2/1/86) 



/ 

Advanced Graphics Toolkit $49.95 

Adds stunning graphics to your kyan pascal programs! The 
graphics primatives in this toolkit let you develop your own 
custom graphics. Or, you can use the library routines to en- 
hance your programs with windows and clipping, shading, 
curves, and 2 and 3 dimensional transformations (with scal- 
ing, rotation, and projections). (Available 2/1/86) 



To Order Call: (415) 626-2080 

Send Check/ kyan software, Dept. W 

Money Order: 1850 Union Street, #183 

San Francisco, CA 94123 

Please include $4.50/order for shipping/ handling; $12 outside North America. 
CA residents add 6.5% sales tax. Purchase orders accepted. Sorry, no COD's. 



15 DAY TRIAL 

We Guarantee Your Satisfaction! 

Try any kyan product for 15 days. 
If not completely satisfied, 
return it for a refund. 



Visa/MC 
Accepted 
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Software Discounters 

€\\ AltfPriC?) Open Saturday 

Vl r^lIIWllWW • Free shipping on orders over $100 

For Orders Only- 1-800-225-7638 continental USA 

PA Orders — 1-800-223-7784 . No surcharge for VISA/MasterCard 

Customer Service 412-361-5291 • Your card is not charged until m sn 



ACADEMY 

Typing Tutor 520ST $23 

ACCOLADE 

Fight Night (D) $19 

Hardball (D) $19 

ACTIVISION 

Borrowed Time 520ST . .$33 
Great American Cross 
Country Road Race (D) . $16 

Hacker(D) $16 

Hacker 520ST $29 

Master of the Lamps(D) . $16 

Mindshadow(D) $16 

Mindshadow520ST $33 

Music Studio 520ST $39 

Space Shuttle(D) $16 

AMERICAN EDUCATIONAL 
COMPUTER 

Biology (D) $14 

French (D) $14 

Grammar (D) $14 

Science: Grades 3/4 (D) .$14 
Science: Grades 5/6 (D) .$14 
Science: Grades 7/8 (D) .$14 

Spanish (D) $14 

U.S. Geography (D) $14 

U.S. History (D) $14 

World Geography (D) . . .$14 
ARTWORX 

Bridge 4.0(D) $16 

Bridge 520ST $19 

Compubridge 520ST ...$19 

Hotel Alien (D) $9 

Strip Poker (D) $21 

Strip Poker 520ST Call 

Female Data Disk 1 . . '. $16 

Male Data Disk 2 $16 

Female Data Disk 3 $16 

AVALON HILL 

Computer Title Bout (D) .$19 

Jupiter Mission 1999 (D) $33 

Panzer Jagd(D) $19 

T.A.C.(D) $26 

BATTERIES INCLUDED 

B-Graph(D) $25 

Degas 520ST $25 

HomePak(D) $33 

Paperclip (D) $39 

Paperclip Elite ST Call 

BRODERBUND 

Bank St. Writer (D) $33 

Championship 

Loderunner(D) $19 

Karateka(D) $19 

Print Shop(D) $26 

Print Shop Graphics 

Library #1. #2. #3(D)$16Ea. 

PS Paper Refill $14 

CBS 

Addition/Subt. (D) $16 

Big Bird's Spc. 

Delivery (R) $7 

Dr. Seuss Puzzler (D) $7 

Decimals:Add/Subt(D) $16 
Decimals: Mult/Div(D) . .$16 
Ernie's Magic Shapes (R) . .$7 
Fractions: Add/Subt (D) . $16 
Fractions: Mult/Div (D) . . $16 

Math Mileage (R) $7 

Mult/Div(D) $16 

Timebound(R) $7 

Webster Word Game (D) .$7 
CONTINENTAL/ARRAYS 
Home Accountant (D) ..$39 
Book of Adv. 

Games II $16 

DATASOFT 

Alternate Reality (D). . . .$25 

Bruce Lee(D) $19 

Mind Pursuit(D) $19 

Never Ending Story (D) $19 
TheGoonies $19 



Zorro(D) $19 

DAVIDSON 

Math Blaster (D) $33 

Spell It (D) $33 

Word Attack (D) $33 

DESIGNWARE 

All Titles Available Call 

ELECTRONIC ARTS 
Afchon (D) 
Archon 2 (D) 

Financial Cookbook 520ST 
Movie Maker (D) 
Music Const. Set (D) 
One-on-One (D) 
Pinball Const. Set (D) 
Racing Destruction Set (D) 
Realm of 

Impossibility (D) 
Seven Cities of Gold (D) 
Super Boulder Dash (D) 
Prices too low to 

advertise!! Call 



Computer Almanac 520ST $23 
Hippo Disk Utilities 520ST $33 
Hippo Ram Disk 520ST .$23 
Jokes & Quotes 

(not for Kids)520ST . .$23 
ICD 

P.R. Connection Call 

RamboXL $37 

US Doubler $49 

INFOCOM 

Ballyhoo (D) $25 

Cutthroats (D) $23 

Deadline (D) $29 

Enchanter (D) $23 

Hitchhiker's Guide 

to the Galaxy (D) $23 

Infidel (D) $25 

Planetfall(D) $23 

Seastalker(D) $23 

Sorcerer (D) $25 

Spellbreaker(D) $29 

Starcross(D) $29 



Flip Side 520ST $25 

Gold Runner 520ST ... .$25 

M-Disk520ST $25 

Mi-Dupe 520ST $19 

Mi-Term 520ST $33 

Mudpies520ST $25 

Soft Spool 520ST $25 

Time Bandit 520ST $33 

MICROLEAGUE 

Baseball (D) $25 

General Manager (D) ...$25 

1985 Team Data Disk (D) $16 

MICROPROSE 

Crusade in Europe (D) ..$25 

F15 Strike Eagle (D) ... .$23 

Kennedy Approach (D) . . $23 

Silent Service (D) $23 

Silent Service 520ST . . $26 
MINDSCAPE 

Bank St. Music Writer (D) $26 

Brataccus 520ST $33 

Crossword Magic(D) ...$33 



Personal Disk 

Kit 520ST $25 

Personal Pascal 520ST .$49 
Personal Prologue 520ST Call 
Writer's Tool w/ 

Spell Checker (R) $44 

ORIGIN 

Ultima 3(D) $34 

Ultima4(D) $39 

PEACHTREE 

Acct. Payables (D) $39 

Acct. Receivables (D) . . . $39 

General Ledger (D) $39 

PENGUIN/POLARWARE 
Crimson Crown 520ST . .$25 

Oo-Topos 520ST $25 

Sword of Kadash 520ST . $25 
The Coveted Mirror 520ST $25 

Transylvania 520ST $25 

PRECISION 
Superscript w/Spell 

Checker XUXE(D) . . $49 



SakcAi 



.we promise performance 




SC-100 

• monitor cables available for i 7. 

The SC-100 is designed to work with Apple, Atari, Commodore. IBM 
PCjr and other personal computers. Includes audio speaker and 
standard earphone jack; provides the most vibrant brilliant colors; 
tested, proven, and rated as the best color monitor available. 

List $ 299 95 Madness Price s 149 00 

Sold to the first 85 customers 



EPYX 

Ballblazer(D) $25 

Jumpman Jr. (R) $9 

Koronis Rift(D) $25 

Pitstop2(D) $25 

Rescue on Fractalus (D) $25 
Temple of Apshai 

Trilogy (D) $25 

The Eidolon (D) $25 

FIREBIRD 

The Pawn 520ST $29 

FIRST STAR 

Spy vs. Spy (D) $19 

Spy vs. Spy 2(D) $19 

FTL/SOFTWARE HEAVEN 

Sundog 520ST $25 

GAMESTAR 

Baseball (D) $16 

Football (D) $16 

On Track Racing (D) $16 

HABA SYSTEMS 

Check Minder 520ST . $39 

Haba Vue 520ST $39 

Phone Book 520ST $39 

HAYDEN 

Sargon 3(D) $33 

HBJ 

Computer SAT (D) $49 

HIPPOPOTAMUS 

Backgammon 520ST ...$25 



Suspect (D) $25 

Suspended (D) $29 

Wishbringer(D) $23 

Witness (D) $23 

Zork 1 (D) $23 

Zork2or3(D) $25 

' All titles in stock for 
520 ST— Call for prices 
KOALA 

Light Pen w/Painter (D) $35 
Touch Tablet 

w/Painter(D) $29.95 

LJK 

Data Perfect (D) $33 

Letter Perfect (D) $33 

Spell Perfect (D) $29 

LEARNING COMPANY 

Bumble Games (D) $25 

Colorasaurus (D) $19 

Magic Spells (D) $23 

Reader Rabbit (D) $23 

Word Spinner (D) $23 

MARK OF THE UNICORN 

Hex520ST $25 

PC Intercomm 520ST ... $79 
The Final Word 520ST . . $95 
MICHTRON 
Bulletin Board 

System 520ST $33 

Calendar 520ST $19 



Halley Project (D) $19 

Tinka's Mazes (D) $9 

Tink's Adventure(D) $9 

Tonk in the Land of 

Buddy-Bots(D) $9 

MIRAGE CONCEPTS 

Atari ST Tool 

Box Vol. 1 $23 

Forth 520ST $33 

H & D Base $65 

MISC. 

Abacus Books 520ST . .Call 
Dragonriders of Pern (D) .$9 

Gorf(R) $7 

Hard Hat Mack (D) $9 

Miner 2049'er(R) $7 

Omnitrend Universe .... $59 
Omnitrend Universe 2 ST . $49 

Popeye(R) $9 

ST Talk $12 

Wizard of Wor(D) $7 

OSS 

Action (R) $49 

Action Tool Kit (D) $19 

Basic XE(R) $49 

Basic XL(R) $39 

Basic XL Tool Kit (D) . . .$19 

MAC 65 (R) $49 

MAC 65 Tool Kit(D) . . . .$19 



PROFESSIONAL 
SOFTWARE 

Fleet System 2 WP w/70,000 
Word Spell Checker (D) $39 
PRYORITY 

Forbidden Quest 520ST.$25 
QUICKVIEW 

Zoom Racks 520ST .... $49 
REGENT 

Regent Base 520ST Call 

Regent Word 520ST $33 

Regent Spell 520ST $33 

SCARBOROUGH 

Mastertype(D) $23 

Net Worth (D) $44 

SIERRA ON LINE 

Black Cauldron 520ST . . $25 

Kings Quest 2 520ST ... $33 

Ultima 1 (D) $23 

Ultima2(D) $37 

Ultima 2 520ST $39 

Winnie the Pooh 520ST $19 
SPINNAKER 

Adventure Creator (R) . . $9 

Alphabet Zoo(R) $9 

Cosmic Combat (R) $9 

Delta Drawing (R) $9 

Facemaker(R) $9 

Fraction Fever (R) $9 

Homework Helper 520ST . $33 



Kung Fu-Exploding 

Fist 520ST $33 

Letter Scrambler (R) $9 

Story Machine (R) $9 

SSI 

Battalion Commander (D) . $25 
Battle of Antietam(D) ..$33 
Breakthrough in the 

Ardennes (D) $37 

Carrier Force (D) $37 

Colonial Conquest(D) ..$25 

Combat Leader (D) $25 

Computer Ambush (D) . . $37 
Computer Baseball(D) . .$25 

Computer QB(D) $25 

Field of Fire(D) $25 

Gemstone Warrior (D) ..$23 
Imperium Galactum (D) .$25 

Kampfgruppe(D) $37 

Questron(D) $33 

NAM (D) $25 

Panzer Grenadier (D) ...$25 

Reforger '88(D) $37 

Six-Gun Shootout (D) . . . $25 

U.S.A.A.F.(D) $37 

WarlnRussia(D) $49 

SUBLOGIC 

Flight Simulator 2(D) . . $32 
SYNAPSE 

Essex (need 2 drives) . . . $25 
Lode Runner's 

Rescue (D) $19 

Mindwheel (need 2 drives) $25 

Syn-Calc(D) $33 

Syn-File(D) $33 

TELLARIUM 

Amazon 520ST $33 

Fahrenheit 451 520ST . .$33 
Nine Princes in 

Amber 520ST $33 

TIMEWORKS 

Data Manager 520ST . . . Call 

Swiftcalc 520ST Call 

Sylvia Porter's Personal 

Fin. Planner 520ST . .Call 
Word Writer 520ST . . . .Call 
TRONIX 

S.A.M.(D) $39 

UNISON WORLD 

Print Master 520ST $26 

VIP TECHNOLOGIES 
VIP Professional 520ST Call 
VIP Prof. Lite520ST ... .$65 
WEEKLY READER 
Stickybear ABC's (D) . $19 
Stickybear Numbers (D) . $19 
Stickybear Opposites (D) $19 
XLENT 

Megafont (D) $19 

Page Designer (D) $23 

Rubber Stamp (D) $23 

Typesetter (D) $23 

Typesetter 520ST $26 

ACCESSORIES 

Ape Face Printer Int. . . .$44 

Astra Disk Drives Call 

Bonus SS. DD $6.99Bx 

Bonus DS. DD $7.99Bx 

Bulk Disks SS.DD . . $59./100 
Compuserve Starter Kit . .$19 

Disk Case (Holds 50) $9 

Dows Jones News 

Retrieval Kit (5 hrs.) . .$14 

Kraft Joystick $9 

MPP300ST Modem $79 

MPP1000E Modem . .Cheap 
MPP1150 Printer Int. . . .$47 
Microprint Printer Int. ..$37 
Quantum Micro 300/1200 

520 ST Modem $159 

Wico Boss $12 

Wico Bat Handle $17 



P.O. BOX 111327— DEPT. AT— BLAWNOX, PA 15238 



'Ordering and Terms: Orders with cashier check or money order shipped immediately Personal/company checks, allow 3 weeks clearance No CO D s. Shipping: Continental 
U.S.A.— Orders under $100 add $3; free shipping on orders over $100. PA residents add 6% sales tax. AK, HI, FPO APO — add $5 on all orders. Sorry — no International orders. 
Defective merchandise will be replaced with same merchandise. Other returns subject to a 15% restocking charge— NO CREDITS! Return must have authorization number 
(412) 361 5291. Prices subject to change without notice. MODEM OWNERS: Type Go SDA on Compuserve's Electronic Mall to see our On-Line Catalog of over 700 software 
titles for Atari, Commodore & Apple. Plus our new Bargain Basement Shoppe with great Software values under $10. Go SDA Now! 



i same of the month 



bomb SQDAD 



AN EXPLOSIVE ADVENTURE 



This challenging arcade/action game 
will push your joystick skills to the 
limit — there are ten levels to com- 
plete. (We never got past level two!) 
But we think you '11 agree that the 
game's sophisticated programming 
features make it worth the effort. The 
BASIC program works on all 8-bit 
Atari computers with at least 32K 
cassette or 48K disk. 

It's not just a job — it's an adventure. 
That's what they said when you en- 
listed in the Interplanetary Bomb 
Squad. Hah! The Bomb Squad is no 
adventure — it's suicide. You'll be 
lucky if you ever get off this frostbit- 
ten world to pick up your paycheck. 

Detonator, your mission is to save 
a planet on the very precipice of ex- 
tinction. Don't blow it! Put in your 
earplugs, strap on your jetpack and 
get ready for your noisiest assignment 
yet. Destroy those bombs before they 
destroy you. 

BLAST OFF 

Before slipping into that jetpack, 
you'll have to carefully type in List- 
ing 1, BOMBSQU.BAS, check it with 
TYPO II and SAVE a copy. If you have 



by PAUL TUPACZEWSKI 



trouble with the special characters in 
lines 25 and 1080, don't bother typ- 
ing it in. Listing 2 will create those 
lines for you and put them in a file 
called LINES. LST Now, type NEW, 
LOAD Listing 1 and ENTER "D: LINES. 
LST" (cassette owners type ENTER 
"C:"). Remember to SAVE your com- 
pleted program before you RUN it. 

When you RUN the program, it will 
take about 30 seconds to load before 
the red Bomb Squad logo rolls onto 
the screen. Plug in your joystick and 
press the trigger to begin. 

You're stuck in an endless labyrinth 
of weapon storage facilities buried 
deep beneath the hard crust of planet 
Htrae. Did we tell you it's not a nice 
place? Red bombs rest on girders in 
the storage vault. Whirling robot 
guards are darting about, just waiting 
for you to drift into their path. Then 
there's Evil Eye — the rotating green 
thing that's constantly trying to run 
you down. And watch out for Puff, 
the red helium balloon. Puff is smil- 
ing, but don't let that fool you. Buggo, 
the white rabbit, moves left and right 
at random. Touch even one of these 
guys and you lose a life. Lose three 
lives and the Detonator gets blasted. 



Get blasted and you go back to the 
first room. Did we tell you this wasn't 
going to be easy? 

If you typed in Antic's March, 1986 
game of the month, you'll notice that 
the jetpack is controlled just like a 
Lunar Lander. Maneuver your jetpack 
by pushing the joystick in the direc- 
tion you wish to go. You don't have 
downward thrusters, by the way. To 
land on one of the girders, you'll have 
to rely on the pull of gravity — what 
little of it there is on planet Htrae. And 
did we tell you about the green spires 
surrounding the border? Stay away — 
they'll just slow you down. 

DONT GET BOMBED 

With all the advances in technology, 
by now someone should have in- 
vented an android that could take care 
of this. It's too blasted dangerous. 
Even for you, The Detonator. But only 
a human would have the agility to 
dart between the unflinching mecha- 
nical guards that haunt this place and 
then — gently, oh, so carefully — land 
on the holding platforms and defuse 
the bombs. 

continued on next page 
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There's hope yet. Every once in a 
while, mysterious symbols appear. If 
you touch the Crystal, all enemies 
freeze in their tracks for a few pre- 
cious seconds. Don't be foolish 
though, they're still deadly to the 
touch. Touch the Snowflake and the 
enemies freeze again. But this time 
when you touch them, you get 500 
points and they get transported out 
of your path, to the top of the screen. 
Each time you touch the Sunburst, the 
point multiplier at the top of the 
screen is advanced by one. 

Detonate every bomb on screen be- 
fore the mechanical meanies get to 
you, and the computer multiplies the 
points by 100 times the number of 
bombs to tabulate your score. The 
number of bombs appears in the up- 
per right hand corner. 

So keep going. Fifteen bombs in the 
first room and who knows — how 
many more bombs? How many more 
rooms? We hear there may be ten. We 
hear that each room is more danger- 
ous, that in some of those rooms, you 



only have one life. We also hear that 
your job may be opening up again, 
real soon, Detonator . . . 

Paul Tupaczewski of Boonton, New 
Jersey is making his debut in Antic. 

Listing on page 115 Q 



GREAT 

SOFTWARE 
VALUES 

in this issue's 

ANTIC 
CATALOG! 



welcomes program 
submissions from readers. Just send 
us your program and accompanying 
article, we'll pay you if we publish 
them. 

We prefer to see your listing and 
text on both paper and disk. 

Sending us your program on cas- 
sette is also okay. But please put pro- 
gram copies on both sides of the 
cassette. 

send to: 
ANTIC 

524 Second Street 
San Francisco, CA 
94107 

Always include a stamped, self- 
addressed envelope so your 
materials can be returned. 
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"COLOR 

MONITOR W/CABLE 



$149 



STAR DELTA IO PRINTER 

1 60 CPS, 8K Buffer, Dual Interface (serial & 
parallel), Friction/Tractor, Bi-directional 
Logic Seeking, Hi Res. Graphics & Epson 
Compare, $2gg 



MORE SOFTWARE-$5.00 each 

Touch Typing (cassette), Spanish Course 
(cassette), Wombats (disk), Stock Analyst & 
Bond Analyst 



GAME CARTRIDGES - your choice $5.00 

GORF, Wizard of Wor, Donkey Kong, Pole 
Position, Journey to the Planets, Rack 'Em 
Up & Diamond Mine 

ATARI 410 CASSETTE DECK 

$19.00 


COMPLETE SYSTEM: 

ATARI 130XE Computer, 1050 Disk 
Drive, 1027 Printer, AtariWriter, & 2 
Games 

$399.00 




California residents add sales tax 
Minimum shipping charge $5.00 

Everything for the ATARI Systems to Parts 


SAN JOSE COMPUTER 
1844 Almaden Rd. Unit E 
San Jose, CA 951 25 
(408) 723-2025 
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It takes 2 of 
their's (Atari) 
to make 1 
of ours. 

It J _ 




$ 299 95 



«*299 95 
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Why pay more — FOR LESS! 

Why buy 2 Atari 1 Mb. Drives, separately 
packed, encased in large plastic housings 
for $599.90, when you can purchase the 
SD-2000 Drive System for $399.95. The 
SHANNER SD-2000 is comprised of two 
3.5", 1 Mb. double sided, double density 
drives packaged in an attractive, coordi- 
nating grey METAL housing and is fully 
compatible with the Atari ST.* 

You can pay Atari or 
you can SAVE $200.00. 



THE SHANNER SD-2000 

Available Now! 



You be the judge. 

$39995 

•Atari and Atari ST are trademarks of Atari Corporation. 



GUMBALL EXPRESS ORDER FORM . For FAST delivery use this order form or call TOLL FREE 800/423-9442 



Product Description Price P&L TOTAL 

Shanner SD-2000 $399.95 $7.50 $407.45 

If you currently own either an Atari SF354 or SF31 4, you can use your 
existing power supply. If not, please order Model No. SD-2000PS for 
$14.95. 

D Check here and add $1 4.95 to $399.95 

All products will be shipped prepaid UPS ground. 

□ Check enclosed. (NOTE— order will be shipped when check clears). 

Make check payable to: 

GUMBALL 
10950 S.W. 5th 
Suite 170 

Beaverton. OR 97005 



□ VISA □ MASTERCARD □ INTERBANK (MasterCard only) 

Name on card 

Account tt 

Expiration Date 

Signature 

SHIP TO: 

Name 

Address 

City 



State 



Zip 



C.O.D.'s and purchase orders will not be accepted by Gumball Express. 
Outside the USA add $10. and make payment by bank draft, payable in 
U.S. dollars drawn on a U.S. bank. 
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NEW OWNERS 
COLUMN 

Lesson 4: Nested Loops 



by DAVID PLOTKIN 



Learn how to program BASIC on 
Atari 8-bit computers such as the 
800XL and the 130XE. This new 
course for beginners started in our 
March, 1986 issue. Author David 
Plotkin, veteran Antic writer and 
programmer, is a chemical engineer. 

Last month, we explained how to use 
IF/THEN statements for making deci- 
sions, and how to use FOR/NEXT 
statements to execute loops. This 
month we are going to talk some 
more about these two sets of com- 
mands, as well as some commands for 
making IF/THEN and FOR/NEXT 
more flexible. 

The IF/THEN statement is used to 
test IF a condition is true, and THEN 
take the appropriate action. We are 
not limited to just testing whether two 
variables are equal. A whole range of 
tests can be performed. You may test 
for the following conditions: 

= Variables are equal to each other 

< First variable is less than the sec- 
ond variable or constant 

> First variable is greater than the 
second variable or constant 



< > First variable is not equal to the 
second variable or constant. 

> = First variable is greater than or 
equal to the second variable or 
constant 

<= First variable is less than or 
equal to the second variable or 
constant 

With this many options available, 
the IF/THEN statement can be used to 
test nearly any set of conditions. For 
example: 

10 IF (XXX > = 4) THEN . . . 
(greater than or equal to) 

20 IF (XXX < > YYY) THEN 
. . . (not equal to) 

30 IF (XXX < 1) THEN . . . 
(less than) 

NESTING 

Both the IF and the THEN must be 
contained within the same program 
line. But the IF/THEN statement can 
be nested. That is, an IF/THEN state- 
ment may contain another IF/THEN 
statement, up to the limit imposed by 
the length of the line: 



10 IF XXX = 5 THEN IF YYY=6 
THEN IF ZZZ = 7 THEN PRINT 
"ALL CORRECT" 

The words ALL CORRECT will be 
printed only if all three conditions are 
met. If any of the conditions are 
false — that is, if any of the variables 
are not equal to the number in the 
equation, then the rest of the state- 
ment will not be executed. 

There is a more efficient way to test 
for multiple conditions than by using 
multiple IF/THEN statements — the 
AND and OR commands which were 
mentioned last month. The AND and 
OR commands will test multiple con- 
ditions, two at a time, to determine 
whether the combination of the con- 
ditions is true or false. For the AND 
statement, the result is true only if 
both statements are true: 



AND "TRUTH TABLE" 

Condition 1 Condition 2 Result 

True True True 

True False False 

False True False 

False False False 
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An example of using the AND state- 
ment in a program might be: 

10 IF (XXX = 5 AND YYY=6) 
THEN PRINT "BOTH CORRECT" 

The words BOTH CORRECT will 
print only if XXX = 5 and YYY=6 
(both are true). If either one is equal 
to something else (one is false), then 
the words will not be printed. 

The OR statement works somewhat 
differently. The result is true if either 
one is true: 

OR "TRUTH TABLE" 

Condition 1 Condition 2 Result 

True True True 

True False True 

False True True 

False False False 

An example of using OR might be: 

10 IF (XXX = 5 OR YYY=6) 
THEN PRINT "ONE OR BOTH 
ARE CORRECT" 

The words ONE OR BOTH ARE 
CORRECT will print out unless nei- 
ther variable is equal to the appro- 
priate value. If either one is equal (one 
is true), then the statement will print 
out. 

Although the AND and OR com- 
mands test conditions for true or false 
two at a time, they can be used to test 
more than two conditions. Take this 
example: 

10 IF (XXX = 5 AND YYY=6 
AND ZZZ = 8 AND BBB = 9) THEN 
PRINT ALL CORRECT" 

This line will be evaluated by first 
testing whether XXX = 5 AND 
YYY=6. If the result is true (they are 
both equal), then the true result will 
be tested against the next condition 
(ZZZ = 8). Each intermediate result is 
used as one of the two conditions to 
test with the next condition. 

Clearly, in this example, any of the 
statements being false will lead the 



whole equation to be false and the 
words will not be printed. AND and 
OR can be combined in the same 
statement. Again the conditions are 
evaluated two by two, with each in- 
termediate result used to evaluate the 
next condition. Assuming that 
XXX = 5, YYY=6 and ZZZ = 7: 

10 IF (XXX = 5 OR YYY=7) 
AND (YYY=8 OR ZZZ = 7) THEN 
PRINT "WHAT A TEST!" 

This statement evaluates as true, 
and the words are printed. XXX is 
equal to 5, so the first combination 
(XXX = 5 OR YYY=7) is true. ZZZ is 
equal to 7, so the second combination 
(YYY=8 OR ZZZ = 7) is also true. 
ANDing the two true conditions to- 
gether (TRUE AND TRUE) is also true. 
The use of AND and OR is a very 
powerful tool in making program de- 
cisions, so you should be comforta- 
ble with their use. If you aren't too 
sure that you can determine when a 
statement is true or false, check this 
month's type-in program for a quiz of 
whether various complex program 
statements are true or false. 

The final command that is useful 
in making decisions in a program is 
NOT. The NOT command takes the 
opposite of of an evaluation's result. 
That is, if a statement evaluates as true, 
then NOT will evaluate the statement 
as false: 

10 IF NOT (XXX>1 AND 
YYY= 3) THEN . . . 

If XXX = 2 and YYY= 3 , so that the 
statement (XXX>1 AND YYY= 3) is 
true, then the above line will not exe- 
cute the part of the statement after 
"THEN" because NOT takes the true 
statement and makes it false. 

FOR/NEXT NESTING 

Last month I explained FOR/NEXT 
loops. There will be times when you 
want to change two or more variables 
at the same time. One way to do this 



is to nest two or more FOR/NEXT 
loops — place one loop inside 
another: 

10 FOR LOOP1 = 100 TO 200 
20 FORLOOP2 = 15 TO 4 STEP -1 
30 SOUND 0,LOOP1,10,LOOP2 
40 NEXT LOOP2 
50 NEXT LOOP1 

This example will play a type of 
whistle on your Atari. Let's see how 
this works. Line 10 initializes the first 
loop variable (LOOP1). Line 20 initial- 
izes the second loop variable 
(LOOP2). Line 30 plays the sound, us- 
ing the values of LOOP1 and LOOP2 
as parameters. Line 40 represents the 
termination of the LOOP2 loop. Fi- 
nally, line 50 terminates the LOOP1 
loop. 

There are some important things to 
notice about this example. When 
nesting, each inner loop must reside 
entirely within an outer loop. In this 
case, the inner loop (LOOP 2) starts 
and ends within the outer loop 
(LOOP1). Each time the outer loop ex- 
ecutes once, the inner loop executes 
through the entire range of the vari- 
able specified in the FOR statement. 

If an inner loop is not contained en- 
tirely within an outer loop, an error 
will result. This can happen acciden- 
tally in a program when you are do- 
ing a lot of jumping around. (GOTOs 
will be discussed in a future column.) 
When you use nested loops, you have 
to be careful about what occurs in the 
inner loop. For example, if your in- 
ner loop modifies the variable used 
in the outer loop, you may exit before 
you want to, or you may never exit 
at all: 

10 FOR LOOP1 = 0 TO 10 

20 FOR LOOP2 = 100 TO 200: 
LOOP1 = 0:NEXT LOOP2 

30 NEXT LOOP1 

continued on next page 
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"Anyone 
who wants to win Mega Wars 

has to dominate 
entire planetary systems. 
And me." 





This program will run forever (or 
until you press the [BREAK] key) be- 
cause the inner loop is setting LOOP1 
equal to zero each time it is executed. 
The outer loop will increment LOOP1 
to 1, but it will never reach 10. This 
illustrates that special care must be 
taken when you are programming 
nested loops. 

FOR/NEXT LOOP EXITS 

Some of the programming commands 
to be covered in future columns will 
tell you how to jump from one pro- 
gram line to another during the run 
of the program. Obviously, such com- 
mands could be used to jump out of 
a FOR/NEXT loop before the variable 
has reached its limiting value: 

10 FOR LOOP = l TO 10 

20 GOTO 40:REM (sends the 
program to line 40, skipping line 30) 

30 NEXT LOOP 

40 REM Pick up here 

This is bad programming practice! 
If you leave a loop without complet- 
ing it and executing the NEXT state- 
ment, your computer will not know 
that the loop is finished. The part of 
memory in your computer which 
keeps track of NEXT statements will 
gradually fill up with uncompleted 
NEXT statements, eventually leading 
to an OUT OF MEMORY error. This 
can happen even though you have 
plenty of regular memory left. There 
is a much better way to exit a loop 
without going through it as many 
times as the FOR statement specifies. 
Have the statements in the loop 
modify the loop variable so that it is 
outside the range specified in the FOR 
statement: 

10 FOR LOOP = l TO 10 

20 PRINT LOOP:IF LOOP>5 
THEN LOOP = 11 

30 NEXT LOOP 

This set of statements will execute 
until LOOP = 6. Then the IF/THEN 
statement in line 20 takes over and 
makes LOOP = 11, which is outside the 
range specified in line 10. Since LOOP 
is outside the range, the program will 
exit the loop and "fall through" to the 
program line following the NEXT 
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LOOP statement. This method of 
properly exiting a loop cleans up your 
computer memory and doesn't lead 
to the problem discussed earlier. 

THE LISTING 

This month's listing tests whether you 
understand how to combine AND, OR 
and NOT for setting up decisions in 
IF/THEN statements. Type in the list- 
ing, NEWOWN4.BAS and SAVE a 
copy before you RUN it, following the 
instructions from previous lessons. 

A statement will be printed on the 
screen, and you will enter T or F for 
True or False. If you get many of the 
answers wrong, I suggest you re-read 
the sections of this column dealing 
with this subject, because the concept 
of Test/Decision in the IF/THEN state- 
ment is very important to your suc- 
cess as a programmer. 

Atari programming beginners will 
find additional details about topics 
covered by this series in Lon Poole's 
fine introductory book, Your Atari 
Computer, SI 7. 95 from Osborne/ 
McGraw-Hill Publishing, Berkeley, 
C4.-ANTIC ED 



Listing on page 114 




Fill out the postage-free 
reader survey card in 
this issue and mail it to 
Antic right away. Ten 
software winners will be 
drawn at random. 



'Ready for an adventurous challenge? 
We're a team. And Nellie 
doesn't horse around." 




CompuServe 
•ZL Games 




You never know 
who you'll be up against 
when you go online 
with CompuServe. 



To buy your CompuServe Subscription Kit, 
see your nearest computer dealer. 
Suggested retail price $39.95, 

To request our free brochure or order direct, 
call or write: 800-848-8199 

(In Ohio, call 614-457-0802) 

CompuServe 
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GAMES 



CALL ATARI CALL 

oiz-ooz-jvju Software Sale (T) Tape, (C) Cartridge, (D) Disk. 



Electronic Arts 

A0684 DR. J & LARRY BIRD GO 1 ON 1 (D) $24.95 

A0685 MOVIE MAKER (D) $23.95 

A0686 SEVEN CITIES OF GOLD (D) $23.95 

A0687 PINBALL CONSTRUCTION SET (D) $16.95 

A0688 MUSIC CONSTRUCTION SET (D) $16.95 

A0689 FINANCIAL COOKBOOK (D) $27.95 

A069O M.U.L.E. (D) $16.95 

A0691 MURDER ON THE ZINDERNUEF (D) $16.95 

Atari 

A0544 STAR RAIDERS (C) $14.95 

A0545 MISSILE COMMAND (C) $14.95 

A0546 GALAX IAN (C) $14.95 

A0547 DEFENDER (C) $14.95 

A0548 DIG DUG (C) $16.95 

A0549 DONKEY KONG (C) $16.95 

A0555 PENGO (C) $16.95 

A0556 MILLIPEDE (C) $16.95 

A0557 JUNGLE HUNT (C) $16.95 

A0559 MOON PATROL (C) $16.95 

A0560 FINAL LEGACY (C) $16.95 

A0561 FOOTBALL (C) $14.95 

A0562 TENNIS (C) $14.95 

A0563 TRACK & FIELD (C) $29.95 

A0564 EASTERN FRONT (C) $14.95 

A0566 ADVENTURE WRITER (D) $19.95 

A0567 STAR VOYAGER (D) $14.95 

A0568 SARGON II (D) $16.95 

A0569 MS PACMAN (C) $16.95 

A0570 DONKEY KONG JR (C) $16.95 

A0571 POLE POSITION (D) $18.95 



Xerox 

A0412 STICKYBEAR BOP (D) $19.95 

A0413 STICKYBEAR NUMBERS (D) $19.95 

A0414 STICKYBEAR BKST BOUNCE (D) $19.95 

A0415 STICKYBEAR OPPOSITES (D) $19.95 

A0416 STICKYBEAR ABC (D) $19.95 

A0417 STICKYBEAR SHAPES (D) $19.95 



BUSINESS 

A0201 ATARI WRITER (C) $39.95 

A0203 VISICALC (D) $29.95 

A0204 HOME FILING MANAGER (D) $19.95 

A0206 FILEWRITER (D) $20.95 

A0207 REPORT WRITER (D) $20.95 

A0208 MENU WRITER (D) $19.95 

A0209 FAMILY FINANCE (D) $19.95 

A0210 HOME INTEGRATOR (D) $19.95 

A021 1 SMALL BUS INVENTORY (D) $1 1 .95 

A0212 SALESMAN'S EXPENSES (D) $11.95 

A0214 RETAIL INVOICE (D) $11.95 

A0215 TIMEWISE (D) $14.95 

A0216 PEACHTREE G/L (D) $49.00 

A0217 PEACHTREE A/R (D) $49.00 

A0218 PEACHTREE A/P (D) $49.00 

A0717 SYN CALC (D) $32.95 

A0718 SYN CALC TEMPLATES (D) $14.95 

A0672 APPT PLNR/WKLY SCHEDULE (D) $12.95 

A0673 ACCOUNTS RECEIVABLE (D) $11.95 

A0674 ACCOUNTS PAYABLE (D) $11.95 



Atari 

A0420 ATARI MUSIC I (D) $19.95 

A0421 ATARI MUSIC II (D) $19.95 

A0422 INTRO PROG I (T) $14.95 

A0423 INTRO PROG II (T) $14.95 

A0424 INTRO PROG III (T) $14.95 

A0425 ATARI LAB STARTER (C) $44.95 

A0426 ATARI LAB LIGHT MOD (C) $33.95 

A0428 SKYWRITER (C) $16.95 

A0429 CONVERSATIONAL FRENCH (T) $16.95 

A0430 CONVERSATIONAL SPANISH (T) $16.95 

A0431 MY FIRST ALPHABET (D) $16.95 

A0432 SPEED READING (T) $19.95 

A0433 TYPO ATTACK (C) $16.95 

A0435 VERBAL MODULE SAT (D) $29.95 

A0436 SAT SAMPLE PRETEST (D) $17.95 

A0437 MATH MODULE SAT (D) $29.95 

A0438 TOUCH TYPING (T) $14.95 

A0439 JUGGLES RAINBOW (D) $16.95 

A0440 JUGGLES HOUSE (D) $16.95 

A0442 TOUCH TABLET/SOFTWARE $49.00 

A0443 PAINT (D) $19.95 

A0315 PILOT/TURTLE GRAPHICS (C) $29.95 

A0316 LOGO (C) $39.95 

A0318 ASSEMBLER/EDITOR (C) $19.95 

A0319 MACRO ASSEMBLER (C) $19.95 

Spinnaker 

A0444 LINKING LOGIC (C) $16.95 

A0445 DANCE FANTASY (C) $16.95 

A0446 MEMORY MANOR (C) $16.95 

A0447 LOGIC LEVELS (C) $16.95 

AOAAR KIMnFRrOAAP (n\ 



Broderbund 

A051 4 MASK OF THE SUN (D) $24.95 

A0515 OPERATION WHIRLWIND (D) $24.95 

A0516 SPELUNKER (D) $18.95 

A0517 LODE RUNNER (D) $20.95 

A0518 WHISTLERS BROTHER (D) $18.95 

A0502 STEALTH (D) $18.95 

A0670 CHAMPIONSHIP LODE RUNNER (D) $26.95 

A0671 KARATEKA (D) $23.95 

Activislon 

A0597 PAST FINDER (D) $20.95 

A0598 SPACE SHUTTLE (D) $19.95 

A0599 GHOSTBUSTERS (D) $18.95 

A0665 HACKER (D) $19.95 

A0666 MIND SHADOW (D) $18.95 

A0667 MASTER OF THE LAMPS (D) $19.95 

A0668 GR AMER CROSS CNTRY RD RACE (D) $1 8.95 

Suncom 

A0190 PARTY QUIZ (D) $14.95 

A0193GENL EDITION 2 (D) $14.95 

A0194GENL EDITION 3(D) $14.95 

A0195 SPORTS EDITION (D) $14.95 

A0196 EDUCATION EDITION (D) $14.95 

A0197 BIBLE EDITION (D) $1 4.95 

A0198 ENTERTAINMENT EDITION (D) $14.95 

Avalon Hill 

A0573 TGIF (D) $16.95 

A0574 FLYING ACE (D) $22.95 

A0575 MIDWAY CAMPAIGN (T) $12.95 

A0576 B-l NUCLEAR BOMBER (T) $18.95 

A0577 LEGIONNAIRE (D) $20.95 

A0578 TAC (D) $26.95 

A0579 MARKET FORCES (D) $14.95 

A0580 PANZER JAGD (D) $20.95 

A0604 FREE TRADER (D) $19.95 

A0605 EMPIRE OF THE OVERMIND (D) $26.95 

A0606 QUEST OF THE SPACE BEAGLE (D) $22.95 

A0607 CLEAR FOR ACTION (D) $26.95 

A0608 PARIS IN DANGER (D) $26.95 

A0609 GULF STRIKE (D) $22.95 

A0504 GALAXY (D) $16.95 

A0505 ANDROMEDA CONQUEST (D) $16.95 

A0506 COMPUTER STOCKS & BONDS (D) $18.95 



Add $3.00 lor shipping, handling and insurance. Illinois residents 
please odd 6% tax. Add $6.00 for CANADA. PUERTO RICO. HAWAII. 
ALASKA APO FPO orders. Canadian orders must be in U.S. dollars. 
WE DO NOT EXPORT TO OTHER COUNTRIES. EXCEPT CANADA. 
Enclose Coshiers Check. Money Order or Personal Check. Allow 14 
days lor delivery. 2 to 7 days for phone orders. 1 day express mail ! 
VISA MASTER CARD — C.O.D. 

No C.O.D. to Canada. APO FPO. 



Synapse 

A0534 ENCOUNTER (D) $14.95 

A0535 BLUE MAX 2001 (D) $18.95 

A0536 QUASIMODO/AIR SUPPORT (D) $16.95 

A0537 NEW YORK CITY/ELECTRICIAN (D) $16.95 

A0538 RAINBOW WALKER/COUNTDOWN (D) . .$16.95 

A0539 FORT APOCALYPSE (D) $20.95 

A0540 BLUE MAX (D) $20.95 

A0715 MIND WHEEL (D) $25.95 

A0716 ESSEX (D) $25.95 

Epyx 

A0520 JUMPMAN (D) $15.95 

A0521 DRAGON RIDERS OF PERN (D) $18.95 

A0522 SUMMER OLY GAMES (D) $24.95 

A0523 PITSTOP II (D) $24.95 

A0524 BALL BLAZER (D) $24.95 

A0525 RESCUE ON FRACTULUS (D) $24.95 

A0693 KORONIS RIFT (D) $24.95 

A0692 THE EIDOLON (D) $24.95 

Strategic Simulations, Inc. 

A0601 SHOOTOUT AT OK GALAXY (D) $17.95 

A0602 DNIEPER RIVER LINE (D) $24.95 

A0603 SPACE COWBOY (D) $18.95 

A0526 KNIGHTS OF THE DESERT (D) $24.95 

A0527 FIELD OF FIRE (D) $24.95 

A0528 FORTRESS (D) $22.95 

A0529 COSMIC BALANCE (D) $24.95 

A0530 IMPERIUM GALATUM (D) $24.95 

A0531 RAILS WEST (D) $24.95 

A0532 TIGERS IN THE SNOW (D) $24.95 

A0533 50 MISSION CRUSH (D) $24.95 

A0590 BROADSIDES (D) $24.95 

A0591 COMPUTER QUARTERBACK (D) $24.95 

A0592 COMPUTER AMBUSH (D) $34.95 

A0593 COMPUTER BASEBALL (D) $24.95 

A0712 COLONIAL CONQUEST (D) $24.95 

A0713 COMBAT LEADER (D) $23.95 

A0714 KAMPFGRUPPE (D) $34.95 



A0449 FACEMAKER (D) $16.95 

A0450 KIDS ON KEYS (D) $16.95 

A0451 GRANDMAS HOUSE (D) $16.95 

A0452 KIDWRITER (D) $16.95 

A0453 FRACTION FEVER (D) $18.95 

A0454 IN SEARCH AMAZ THING (D) $22.95 

A0455 TRAINS (D) $18.95 

A0456 ALPHABET ZOO (D) $16.95 

A0457 AEROBICS (D) $22.95 

A0710 DELTA DRAWING (C) $16.95 

A0711 ADVENTURE CREATOR (C) $16.95 

American Educational Computer 

A0459 VOCABULARY WORD BLDR (D) $16.95 

A0460 GRAMMAR WRK USE SKILLS (D) $16.95 

A0461 WORLD GEOGRAPHY FACTS (D) $16.95 

A0462 SPANISH VOCAB SKILLS (D) $16.95 

A0463 FRENCH VOCAB SKILLS (D) $16.95 

A0464 WORLD HISTORY FACTS (D) $16.95 

A0465 US HISTORY FACTS (D) $16.95 

A0466 US GEOGRAPHY FACTS (D) $16.95 

A0467 US GOVERNMENT FACTS (D) $16.95 

A0468 A PLUS LEARN TO READ (D) $24.95 

A0470 A PLUS READING COMPREHENSION (D) . $24.95 

A0471 COMPUTER LEARNING PAD $37.95 

A0418 BIOLOGY FACTS (D) $16.95 

A0493 ELEM SCIENCE 3 & 4 (D) $16.95 

A0494 ELEM SCIENCE 5 & 6 (D) $16.95 

A0495 ELEM SCIENCE 7 & 8 (D) $16.95 

DLM 

A0680 SPELLING WIZ (D) $19.95 

A0681 ALIEN ADDITION (D) $19.95 

A0682 METEOR MULTIPLICATION (D) $19.95 

A0683 ALLIGATOR MIX (D) $19.95 

Artworx 

A0738 LINKWORD LANGUAGE-SPANISH (D) . . . $17.95 

A0739 LINKWORD LANG-FRENCH (D) $17.95 

A0740 LINKWORD LANG-GERMAN (D) $17.95 

A0741 LINKWORD LANG-ITALIAN (D) $17.95 

A0663 MONKEYMATH (D) $15.95 

A0664 MONKEY NEWS (D) $15.95 



ORDER COMPUTER DIRECT 

T^^% ^% £± We Love Our Customers 

■ Vs#l*J#% ■ 22292 N. Pepper Rd., Barrington, 111.60010 

312/382-5050 to ord 



■I 152K Lowest Price In The USA! i52K 

atar!^ Computer System Sale 

• Students • Word Processing • Home • Business 




$379 



SYSTEM PRICE 



LOOK AT ALL YOU GET FOR ONLY 

LIMITED QUANTITIES 

® Atari 130XE 152K Computer 

©Atari 1050 127K Disk Drive 

©Atari 1027 Letter Quality 20 CPS Printer 

Atari Writer Plus Word Processer with Spell Checker 

Atari BASIC Tutorial Manual 

All connecting cables & T.V. interface included 
ft Monitors sold separetly. 



LIST PRICE 
$249.00 
299.00 
299.00 
59.95 
16.95 



INDIVIDUAL 
SALE PRICE 

$134* s 
159' 5 
159 ,s 

49 ,s 

12" 



TOTALS $923.90 $517.75 

CALL FOR 1027 PRINTER REPLACEMENT OPTIONS 



SAVE 

OVER $100 

All 5 ONLY 

$37900 

SYSTEM 
SALE PRICE 







Other Accessories 


List 


Sale 


Add $9.95 for 




12' 


Hi Resolution Green Screen Monitor 


$199.00 


$79.95 


Connection Cables 




13' 


Hi Resolution Color Monitor 


$399.00 


$159.95 


Add $10 for UPS 



15 DAY FREE TRIAL. We give you 15 days to try out this ATARI COMPUTER SYSTEM! ! If it doesn't meet your expectations, just send it back to us prepaid 
and we will refund your purchase price! ! 90 DAY IMMEDIATE REPLACEMENT WARRANTY. If any of the ATARI COMPUTER SYSTEM equipmenl or 
programs fail due to faulty workmanship or material within 90 days of purchase we will replace it IMMEDIATELY with no service charge! ! 



Best Prices * Over 1000 Programs and 500 Accessories Available 9 Best Service 
* One Day Express Mail 9 Programming Knowledge 9 Technical Support 



Add $25.00 for shipping and handling!! 

Enclose Cashiers Check, Money Order or Personal Check. Allow 14 
days for delivery. 2 to 7 days for phone orders. 1 day express mail ! 
We accept Visa and MasterCard. We ship C.O.D. to continental 
U.S. addresses only. Add $10 more if C.O.D., add $25 if Air Mail. 



COMPUTER DIRECT 

We Love Our Customers 
22292 N. Pepper Rd., Barrington, III. 60010 

312/382-5050 to order 
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ATARI LEARNING 

CENTER 

'The best educational machine 7 

by GIGI BISSON, Antic Assistant Editor 



"The Atari is the best educational ma- 
chine around, there's no doubt in my 
mind," Robert Hashway says. 

Hashway can say this with confi- 
dence — he has the statistics to back 
it up. He first discovered the Atari 
while working on instructional de- 
velopment of programs in institu- 
tional research and statistical analysis 
for Massachusetts State University. 
When he completed research studies 
on computers in education for MSU 
in 1981, the Atari 800 computer came 
out on top. 

Hashway discovered that the fea- 
tures built into the Atari to run enter- 
tainment software — clear graphics 
and sound, smooth vertical and 
horizontal scrolling — also make it an 
excellent computer for running 
educational software. He's been 
cheerleading for Atari computers ever 
since. 

His gung-ho Atari optimism might 
be difficult for skeptics to swallow if 
Hashway 's credentials weren't so im- 
peccable. A PhD and distinguished 
educator, "I'm mentioned in Who's 
Who and all that other stuff," he says, 
Hashway has an extensive back- 
ground in computer education, math- 
ematics and statistical research. And 
he has daily proof to back up those 
statistics. He runs the Advanced Con- 
cepts Learning Center in West War- 
wick, Rhode Island, an educational 
institution that uses Atari XL/XE and 



ST computers exclusively. 

After becoming a confirmed Atari 
believer, Hashway formed the Rhode 
Island Atari Users Group. During users 
group meetings, he saw a desperate 
need for computer education to train 
teachers in effective classroom use. He 
started the Advanced Concepts Learn- 
ing Center, and in three years it has 
grown from a computer curriculum 
class for teachers, to a full-fledged 
educational institution, computer 
store, and consulting business. 

Teachers now learn the latest tech- 
niques of computer-managed learning 
systems and how to develop custom- 
ized computer courses. Classes are 
available for all ages and experience 
levels ranging from "Computer 
Movies" for kids, to "Business Finance 
Systems" for adults. 

NOVICE TO EXPERT 

The Learning Center devotes most of 
its time to educating computer 
novices. "We're talking about people 
who don't even know what a modem 
is," he says. "We're addressing the pri- 
mary question of 'What is a computer 
and how do I use it?"' 

The Learning Center is now going 
way beyond beginner-level instruc- 
tion. There is a class that trains 
teachers in techniques of course de- 
sign and computer aided research, us- 
ing MicroTeach by DynaComp. Math 
teachers are learning to manage class- 



room instruction with a math system 
for the Atari by 3R. Teenagers are 
learning BASIC programming, word 
processing with AtariWriter, fun- 
damentals of databases with SynFile + 
and spreadsheets with SynCalc. The 
most popular course for adults leads 
to a certificate in financial systems 
analysis and inventory control. 

Atari ST computers are used for in- 
structing teachers how to do graphics. 
Students learn the basics of profes- 
sional ST office systems with the VIP 
Planner spreadsheet, DB Master data- 
base, IST-Word word processor, and 
Cash Flow, a $99 accounting package 
which Hashway designed himself. 

Hashway is now starting to do out- 
side training in industries. The Atari 
800 has been put to work at a chemi- 
cal laboratory, and ST computers are 
assisting in the design of intricate lace- 
work patterns for textile mills. 

And yes, there's a summer camp 
too, where kids make posters with 
Broderbund's Print Shop, learn key- 
boarding skills on Touch Typer, draw 
graphics with touch tablets and make 
animated cartooons with Electronic 
Arts' Movie Maker. 

The Learning Center slogan is 
"Learning is our most important prod- 
uct," and Hashway lives by it. "The 
problem is not teaching how to use 
software or hardware, it's learning 
what to use it for," he says. "In the 
education field, we need to learn anal- 
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The PROBURNER a Professional Quality 
EPROM/EEPROM Programmer in a Cartridge 

What you don't get is a jumble of switches, cables, adapters, power 
supplies, PC boards, and disks of software. 

What you do get is a user friendly, super compact unit with internal 
software that provides clear menu type instructions. 



Functions: copy, erase check, verify, 
burn-in, store/load to disk/cassette, 
monitor (memory display/change, block 
move, printer dump etc.), and run-from- 
socket mode. 

EPROM types: 2716, 2732, 2732A, 2764, 
27128, 2532; EEPROM types: 281 6A, 
52B13, 52B23, 52B33; ROMS: 2K to 8K 
types. 

Add $2.50 for shipping. 

Send check or money order to: 

THOMPSON ELECTRONICS 

1074 Kensington Ave., Suite 188, 
Buffalo, NY 14215 
Canada: 7 Jackes Ave., Suite 502, 
Toronto, Ontario, M4T 1E3 (416) 960-1089 
Atari is a trademark of Atari, Inc. 



For the ATARI 400/800 and XUXE series 
PROBURNER $149 

ATARI 800 products: 

OS Board — replaces operating system 

with a 2764. $21 

C Board - adds 4K (2732) to the 
COOO-CFFF space. $26 




education 



ysis and synthesis. Teachers have 
never had the power of the computer 
available before. They've never had to 
deal with these concerns." 

Hashway is convinced that what-if 
modeling with spreadsheets and data- 
base research will be the essential of- 
fice skills of the 1990s, the way typ- 
ing and filing are today. 

"I don't see anybody using file cabi- 
nets at the end of the decade," he 
predicts. Will workers be using Atari 
computers instead? He hopes so. 

ADVANCED CONCEPTS 
LEARNING CENTER 
1216 Main Street 
West Warwick, Rl 02893 
(401) 822-2540 




CATCH A RISING STAR 
AT A FALLING PRICE 



SG-10/15 

STAR'S most popular printer! Dot matrix printer prints at 120 
cps draft quality and 30 cps NLQ, 2K. Buffer on the SG-10 and 
16Kon the SG-15. 

LOW PRICE: SG-10 $210.95 SG-15 $369.00 
SD-10/15 

The SD's are built for speed. They go at 160 cps when print- 
ing draft quality and produce NLQ at 40 cps. 

LOW PRICE: SD-10 $321.95 SD-15 $441.00 
SR-10/15 

The SR is a sophisticated high-speed dot-matrix printer for 
office or home use. At 200 cps, it's a high speed draft quality 
printer, and a super quick 50 cps NLQ. 

LOW PRICE: SR-10 $469.00 SR-15 $582.00 

SB-10 

Need letter quality? SB-10 prints at a fast 60 cps NLQ and 
144 cps draft quality. Need graphics? SB-10 delivers a complete 
array of high-resolution graphics. Need more memory? SB-10 
gives you buffer options up to 1 28K! 

LOW PRICE: SB-10 $565.00 
Powertype 

The perfect daisywheel printer for crisp, clean, quality corre- 
spondence. At 18 cps it can print both word processing and 
standard print modes. 

LOW PRICE: Powertype $299.95 




Own a Star printer and you possess some of the most sophis- 
ticated printer technology money can buy (usually a lot more 
money than you'll every par for a Star). 

At Star we insist on outstanding print speed and print quality. 
Imagine a printer that features 200 cps draft ad NLQ. Or a 60 
cps letter quality printer with 144 cps draft. You can find them 
in the Stars. 

Our spreadsheet printers boast 16K of memory. And there's a 
10" model with the option to go up to 128 K. 

Don't miss this rare chance to add something brilliant to your 
system. Reach for a Star at a falling price. || 



MASTER 
CARD 4% 

AMERICAN 
EXPRESS 5% 



THE POWER BEHIND THE PRINTED WORD® 

"Where Prices are Born, Not Raised." 

H/TE HOUSE 
COMPUTER 

P.O. Box 4025, Williamsport, PA 17701 



ORDER TOLL FREE 
1-800-351-3442 

ALL CUSTOMER SERVICE CALLS 
AND PA RESIDENTS CALL 

1-717-322-7700 





June 1986 
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inCELLKOm 



NEWSNET 



ELECTRONIC 
MAIL 






A COMPLETE Communications System 



Now you can tap any of the countless 
telephone data based INFO sources, 
EXTRACT and FILE that data away for 
use later. Suddenly, your computer is 
the smartest terminal around because 
INTELLICOM emulates such ter- 
minals as: 

• Digital VT51/VT100 

• TeleVideo910 • ADM3A/5 

• ADDS Viewpoint/25 

• CompuServe Executive 

• TeleVideo 925 

Now you can transfer both binary and 
text files, using simple ASCII, ASCII 
Capture, Xon/Xoff, XMODEM (both 
Checksum and CRC are supported), 

DON'T DELAY! 

ORDER TODAY! 
RETURN UPS SHIPMENT 
GUARANTEED! HURRY! 



KERMIT or CompuServe A Protocols. 
Operate at any speed up to 9600 baud 
without ever being outdated as higher 
speed/lower priced modems are 
introduced. 

Simple menu selections, with a built in 
HELP facility keep it easy forever. 

Autodial directories and auto login are 
supported along with simultaneous 
printing. 

Additional features: Variable Buffer 
Size reduces disk activity, while 
utilizing RAM capacity. Customizing 
utility program included to ease instal- 
lation and use. Persistence feature for 
autodialing and auto login. 



Auto login script files can be used to 
support almost any smart modem and/or 
automatically log into your favorite 
remote system. User defined function 
keys. Color support. Remote access. 

Best of all, the entire versatile 
INTELLICOM package costs you 
only $69.95, FOR YOUR 520 ST!! 

INTELLICOM is currently being used 
by ARMCO Steel, General Motors, 
Smithsonian Institute and countless 
other large corporations and government 
agencies worldwide. INTELLICOM is 
also available for use on IBM PC, Jr., 
AT and other true IBM compatibles as 
well as the Sanyo 550 series. 




MasterCard/VISA/COD orders accepted 
Specify computer and DOS version when 
ordering. Connecticut residents add 7 1 /2% sales 
tax. Add $5 shipping for all orders. 




INCLUDES FREE 
SUBSCRIPTION TO 
OFFICIAL AIRLINES 
GUIDES 
SAVE $50.00! 



QJUKn 



1325 East Main Street, Waterbury, CT 06705 
In Connecticut call: 597-0273 




REQUIRED READING 




INTERNALS 

Essential guide to learning the 
inside information of the ST. 
Detailed descriptions of sound 
& graphics chips, internal 
hardware, various ports, GEM. 
Commented BIOS listing. An 
indispensible reference for 
your library. 450pp. $19.95 



GEM Programmer's Ref. 

For serious programmers in 
need of detailed information 
on GEM. Written with an 
easy-to-understand format. All 
GEM examples are written in 
C and assembly. Required 
reading for the serious pro- 
grammer. 450pp. $19.95 



TRICKS & TIPS 

Fantastic collection of pro- 
grams and info for the ST. 
Complete programs include: 
super-fast RAM disk; time- 
saving printer spooler; color 
print hardcopy; plotter output 
hardcopy. Money saving tricks 
and tips. 200 pp. $19.95 



GRAPHICS & SOUND 

Detailed guide to understand- 
ing graphics & sound on the 
ST. 2D & 3D function plotters, 
Moire patterns, various reso- 
lutions and graphic memory, 
fractals, waveform generation. 
Examples written in C, LOGO, 
BASIC and Modula2. $19.95 



BASIC Training Guide 

Indispensible handbook for 
beginning BASIC program- 
mers. Learn fundamentals of 
programming. Flowcharting, 
numbering system, logical 
operators, program structures, 
bits & bytes, disk use, chapter 
quizzes. 200pp. $16.95 




PRESENTING THE ST 

Gives you an in-depth 
look at this sensational 
new computer. Discusses 
the architecture of the 
ST, working with GEM, 
the mouse, operating 
system, all the various 
interfaces, the 68000 
chip and its instructions, 
LOGO. $16.95 



MACHINE LANGUAGE 

Program in the fastest 
language for your Atari 
ST. Learn the 68000 
assembly language, its 
numbering system, use 
of registers, the structure 
& important details of the 
instruction set, and use of 
the internal system 
routines. 280pp $19.95 



LOGO 

Take control of your 
ATARI ST by learning 
LOGO-the easy-to-use, 
yet powerful language. 
Topics covered include 
structured programming, 
graphic movement, file 
handling and more. An 
excellent book for kids as 
well as adults. $19.95 



PEEKS & POKES 

Enhance your programs 
with the examples found 
within this book. Explores 
using the different lang- 
uages BASIC, C, LOGO 
and machine language, 
using various interfaces, 
memory usage, reading 
and saving from and to 
disk, more. $16.95 



BEGINNER'S GUIDE 

Finally a book for those 
new to the ST wanting to 
understanding ST basics. 
Thoroughly understand 
your ST and its many 
devices. Learn the funda- 
mentals of BASIC, LOGO 
and more. Complete with 
index, glossary and illus- 
trations. +200pp $14.95 



BASIC TO C 

If you are already familiar 
with BASIC, learning C 
will be all that much 
easier. Shows the trans- 
ition from a BASIC 
program, translated step 
by step, to the final C 
program. For all users 
interested in taking the 
next step. $19.95 



Abacus 



mmw\ 



The ATARI logo and ATARI ST are trademarks of Atari Corp. 



Software 



P.O. Box 7219 Grand Rapids, Ml 49510 -Telex 709-1 01 -Phone (616) 241-5510 

Optional diskettes are available for all book titles at $14.95 

Call now for the name of your nearest dealer. Or order directly from ABACUS with your MasterCard, VISA, or Amex card. Add 
$4.00 per order for postage and handling. Foreign add $10.00 per book. Other software and books coming soon. Call or 
write for your free catalog. Dealer inquiries welcome-over 1400 dealers nationwide. 
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MIDI 
MUSIC SYSTEM 

Synthetic Software 
189 Duncan Street 
San Francisco, CA 94110 
(Requires Hybrid Arts 
MID IM ATE Interface) 
$69.95, 48K disk 

Reviewed by Gary Yost 

First there was Advanced Music Sys- 
tem (AMS) by Lee Actor, an old APX 
favorite. AMS II was an upgraded ver- 
sion released in 1983- Now, every- 
body wants MIDI software. Yet for 
hobbyists who cannot perform well 
enough to use sequencers and MIDI 
recorders, or for professionals in- 
terested in arranging and composi- 
tion — how do we control our synthe- 
sizers? The answer is the MIDI Music 
System (MMS) written by Lee Actor of 
Synthetic Software. 

The sophistication of MMS goes far 
beyond Actor's earlier programs. The 
MIDI Music System is an interactive 
music editor (or "step-editor" in MIDI 
parlance) with a word processor style 
of editing — scroll through data, insert, 
delete, cut and paste. I found it very 
easy to use. All selections of MMS are 
accessed from the Main Menu. These 
12 selections include playing and edit- 
ing music, MIDI channel assignment 
and mode commands, tempo, disk 
I/O and a directory. One other useful 
item is online Help, which describes 
in detail each of the other selections. 
I found this a valuable aid in learning 
the Music Editor commands. 

For those of you familiar with AMS, 
the musical notation is similar. It has 
also been compared with "Page R" of 
the Fairlight Computer Musical Instru- 
ment (CMI). A note is specified by a 
letter name, an octave number, and a 
duration. For example, C4Q is a C, 
fourth octave, quarter note. This no- 
tation is easy to learn — once I got the 
hang of it, I could really fly. 

This software has so many power- 
ful features, that I can only begin to 



list some of them: 

Pitch values can be entered directly 
from your MIDI synthesizer. I found 
this especially useful when entering 
sheet music. 

Tempo control is remarkable. One 
method of control allows tempo con- 
tinuously changing at a fixed rate! 

Velocity, Pitch Wheel, and MIDI 
Clock are all well supported. Pitch 
Wheel commands take up only three 
bytes! 

Jump commands allow easy and 
efficient use of frequently used 
phrases. This really helped me when 
entering a repetitive note or first and 
second endings. 

Repeat loops simplify the entering 
of repetitive lines. Boy, is this a 
timesaver. 

MMS contains 99 Voices (or mono- 
phonic tracks), of which 20 "Chan- 
nel Voices" can be assigned to any of 
16 MIDI channels. The remaining 
voices are "Phrase Voices" referenced 
in Jump commands. I could write a 
20-voice composition while using the 
other voices for phrases, recurring 
themes, or the same part used by 
more than one voice. This feature in 
conjunction with Repeat loops makes 
note capacity seem infinite. 

The Music Editor displays three 
voices simultaneously. Moving 
through your music is extremely fast 
and easy. Scroll through a single voice 
by single note, by measure, or specify 
the measure desired. Scroll across 
voices or select the voice desired. The 
ease with which I could move 
through the music adds to the profes- 
sionalism of this program. 

The manual is well written and al- 
though it lacks an index, the table of 
contents is detailed. AMS users will 
probably get started immediately with 
only the aid of online Help. 

My only criticism is the absence of 
a "sync in" capability. This is mostly 
an issue for professional musicians 
who would like to make multi-track 
recordings. Also there is no Play 
Through feature. 



We contacted Synthetic Software 
on this matter. If there is interest, they 
will add these capabilities in a future 
update. 

One final note: MMS comes with an 
AMS to MMS conversion program. It 
converts AMS I to AMS II files and 
both AMS I and AMS II to MMS files. 
For AMS users gone MIDI, this prod- 
uct is a "must have!" In summary, 
MMS is easy to use, very powerful and 
appears to be bug-free. I highly recom- 
mend it for anybody interested in 
controlling MIDI synthesizers with 
their Atari 8-bit computer. 



NAM 

Strategic Simulations Inc. 
883 Stierlin Road, Bldg. A-200 
Mountain View, CA 21030 
(415) 964-1983 
$39.95, 48K disk 

Reviewed by Rich Moore 

No matter what people at home 
called it, the Vietnam "conflict" was 
a real war to the men who fought 
there. The enemy was trained, well- 
armed and highly skilled in using his 
home terrain to either seize the initia- 
tive or check U.S./Allied momentum. 
SSI's excellent new tactical simulation, 
NAM, pits one player against a com- 
puter as wily as the Viet Cong and 
North Vietnam army units it simu- 
lates. All the action takes place at the 
squad level with a terrain resolution 
of 50 meters. Vigilance and survival 
are paramount. 

The six basic scenarios each have 
both historical and optional starting 
positions to give 12 unique situations 
representing the major types of 
ground engagements in Southeast 
Asia. Three levels of difficulty allow 
players from beginner to expert to en- 
joy satisfying games. Play proceeds in 
turns which incorporate battlefield 
observation, artillery fire/air strikes, 
enemy fire and movement, friendly 
fire and movement, overall tactical as- 
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sessment and an opportunity to save 
the game. 

The first of the six well-designed 
situations is appropriately the ambush 
of a truck convoy. You earn extra 
points for getting the trucks out of 
"harm's way", apparently impossible 
(10 out of 10 tries, anyway) in the 
historical setup, since the VC/NVA 
units always shoot first and always go 
for the trucks in their opening volleys 
of fire. The other scenarios all seem 
manageable with either set of start- 
ing positions — depending upon how 
you use your forces, of course! 

Besides the truck ambush, NAM 
provides a firebase skirmish, a large- 
scale helicopter assault, a clearing 
operation in an area honeycombed 
with caves, the single U.S./NVA armor 
engagement and the urban battle to 
retake the city of Hue. 

Familiarity with Southeast Asia 
operations is an asset, but not a re- 
quirement. The well-written manual 
clearly states how to load the game 
and execute all 11 phases of play. The 
scenarios are described in concise 
terms along with any special rules that 
apply. Key points regarding terrain, 
the types of forces and their deploy- 
ment are emphasized and deserve ex- 
tra attention to be successful. Some 
lessons, such as routinely digging in, 
force mobility, helicopter firepower 
and the judicious use of artillery are 
driven home in the game much more 
effectively than in the manual. 

The multi-colored graphics are ex- 
cellent. Icons representing the com- 
bat units are easily interpreted. The 
terrain features are the best I've seen 
in a war game — dense jungle, rough 
and open ground, hills, roads, caves, 
buildings, rivers, bridges and walls are 
all colorful and well-defined. The 
player's view scrolls smoothly over a 
playfield almost twice the dimensions 
of the screen. Virtually all input to the 
simulation is via a joystick and cur- 
sor with the commands a natural part 
of each phase in a turn. 

NAM is fun and a challenging simu- 



lation of combat with enough variety 
to make it enjoyable for a long time. 
Moderately addictive, it tempts you to 
play ''just one more turn" before din- 
ner/bed/dawn/finishing this review. 
Speaking of which, I've got to go back 
and finish clearing out those caves. 



SOUNDMOUSE ■ 

Soundsoft, Inc. 

P.O. Box 740, 10 Maple Avenue 
Andover, NJ 07821 
(201) 786-6060 
$39.95, 48K disk 

Reviewed by Charles Cherry 

Now here is a fun item. The Sound- 
Mouse is not really a mouse, although 
it looks like one. It's a sound-activated 
controller. The little box plugs into the 
joystick port and listens, particularly 
for low pitched sounds. It continu- 
ously translates the sound volume 
into a value for the paddle register. 
Simple and effective. 

Once the result is in the computer, 
software can do anything with it. 
Since the sound can come from any- 
where, the possibilities are limitless: 
games that work with a shout, a clap 
or a footstomp; an unusual random 
number generator; an applause meter; 
an event counter; a burgler alarm; or, 
of course, a music-driven light show. 

Although the SoundMouse works 
through the paddle register, an assem- 
bly language programmer could write 
a little routine to feed the data into the 
joystick register. Such a routine could 
allow you to use the SoundMouse as 
the joystick trigger with some com- 
mercial games. You could steer with 
the joystick and shoot by yelling 
FIRE!. 

A sensitivity control (the only mov- 
ing part) lets the SoundMouse re- 
spond to a wide range of noises. This 
makes it suitable for an equally wide 
range of applications. Although the 
manual says the SoundMouse re- 
sponds to the volume of the sound, 



experimentation showed that it really 
responds to the change in volume. 

For example, a constant sound 
returns a level of about 105, no mat- 
ter how loud it is. If the volume drops, 
the number decreases. But if the vol- 
ume drops and stays constant at a 
lower level, the value will drop and 
then rise back to 105. This makes it 
relatively immune to constant back- 
ground noises. 

Normally a hardware device like 
this is for people who can utilize it 
in their programming. But the Sound- 
Mouse comes with some demo pro- 
grams which are spectacular. The light 
shows alone are worth the price of ad- 
mission. There are also some exam- 
ples of games and other uses for the 
SoundMouse, including an animated 
three-piece band which will play 
along with your stereo. 

The SoundMouse is well designed 
and well constructed. It is a unique 
product with many potential uses, at 
a reasonable cost. And it is a lot of fun. 



GRADESCAN warn 

C. Robert Blum 
1722 Golden Court 
Crofton, MD 2114 
$29.95, 48K disk 

Reviewed by Stephen Roquemore 

Gradescan is a teachers' application 
program for tracking students, classes, 
and grades. It is menu-driven and easy 
to use. The term "user-friendly" has 
been beaten to death, but it really ap- 
plies to this software. 

The program uses only one disk 
drive, even if you have more. The 
manual is clear and easy to under- 
stand, although it is not at all fancy. 
It is simply a stapled-together printout 
of a text file, with a title page appar- 
ently done by Broderbund's Print 
Shop. 

However, after starting up the soft- 
ware you really don't need a manual. 

continued on next page 
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The menu choices are successfully 
designed to make using the program 
intuitive. The Main Menu presents you 
with 11 choices, arranged in the or- 
der of most to least usage. They are: 
Retrieve Data from Disk, Create New 
Class, Enter Grades, Examine Aver- 
ages, Examine Grades, Examine Class 
Averages, Correct or Revise Records, 
Add/Delete Student Names, Store Data 
on Disk, Print Reports and End 
Program. 

When starting fresh, you need a 
blank, formatted disk for your class 
data. Atari BASIC is required. You start 
with Selection 2. After creating your 
class files, you use Selection 8 to add 
the students to the class. As the term 
progresses you use Selection 3 to en- 
ter the grades. 

The program comes with a "demo" 
disk to help you get used to the pro- 
gram before you enter your own data. 
It is really helpful in learning the pro- 
gram! The author stresses strongly 
that you should not store data on the 
program disk, nor should you write 
DOS files to the data disk. The pro- 
gram is copyable, it comes with DOS 
2.5 in single density and you do NOT 
need an Atari 1050 disk drive to run it. 

If you are a busy teacher looking 
for an easy-to-use program to help you 
with your classroom record-keeping, 
then Gradescan is the one for you. I 
highly recommend it to all teachers. 

SPELLBREAKER m 

Infocom 

125 Cambridge Park Drive 
Cambridge, MA 02140 
(617) 492-6000 

48K disk (also available for ST) 
$49.95 

Reviewed by Harvey Bernstein 

Calling all Infocom freaks . . . Did 
you zip through Zork? Were you able 
to hurry through the Hitchhikers' 
Guide? Was Planetfall a mere 
problem-solving pitstop? Have I got 
a challenge for you! Spellbreaker, 



the third game in the Enchanter/ 
Sorcerer Trilogy, has been released. 
And I found it to be the toughest, 
most frustrating Infocom game yet. 
Three weeks of (practically) sleepless 
nights and I'm still little more than 
one-third of the way through. The 
problem is, not only is the game damn 
hard, it is also as well-written and as 
much fun as any previous Infocom 
text adventure. 

Starting where Sorcerer left off, you 
are once again a full-fledged member 
of the Circle of Enchanters. But there 
is a crisis in the land! Everything is go- 
ing to pieces (literally and figuratively) 
and now magic itself is starting to fail. 
During an emergency meeting of the 
Circle, you notice your comrades 
starting to turn a little green about the 
gills. In fact, a couple even croak 
(sorry). Anyway, only you are left to 
follow a mysterious stranger who 
promptly vanishes, leaving a strange 
white cube behind. Learning what to 
do with the cube is essential, as it is 
the key to the heart of Spellbreaker. 
In fact, along the way you will find 
a number of like cubes, each of which 
takes you to a "mini-adventure" that 
must be solved — much the same as 
the Infnite Improbability Drive in 
Hitchhiker. 

In fact, untangling the gordian knot 
of cubes-within-cubes-within-cubes is 
what makes Spellbreaker such a chal- 
lenge. All the cubes contain very dif- 
ficult problems, most of which re- 
quire objects found in other cubes! 
The game was written by Dave Leb- 
ling, co-creator of the original Zork, 
and in many ways is reminiscent of 
the original Infocom style. The prob- 
lems are of the old-fashioned locked- 
door variety, which are solved by ob- 
ject manipulation or (as in the other 
games in this series) the use of magic. 
Character interaction is minimal. I've 
lately come to think of Spellbreaker 
as Zork IV. The only thing I miss is 
Infocom's sometimes wry sense of 
humor. 

The one aspect of the game I dis- 



liked had to do with the sub-plot of 
failing magic. Often, when casting a 
spell, it doesn't work. That doesn't 
mean that it was the wrong spell. In- 
stead, you have to try again. And 
again. Since failure seemed to be a ran- 
dom event, there were times that I 
had to learn and cast the same spell 
as many as seven times in a row. That 
can get a little tedious. Owners of 
early versions should be aware of a 
bug in the program. At one point you 
will be in a room, the only exit being 
a hole plugged with a piece of alabas- 
ter. Don't rezrov the hole (even 
though you can). You still won't be 
able to use the exit. You must rezrov 
the plug in order to leave. Supposedly, 
later versions have corrected this. 

Spellbreaker is rated Expert, and 
that is one of the greatest understate- 
ments of the year. It is an excellent 
game, with plot and developments 
that rank with Infocom's best. It will 
no doubt be much too difficult for 
most adventurers, and it may be 
worth your while to send for the hint- 
book as soon as you buy this game. 



BATTALION 
COMMANDER 

Strategic Simulations Inc. 
883 Stierlin Road, Bldg. A-200 
Mountain View, CA 94043 
(415) 964-1200 
$39.95, 48K disk 

Reviewed by Dr. John Stanoch 

Armored fighting tactics have 
changed greatly since the end of the 
World War II. With SSI's Battalion 
Commander, a player can explore 
the tactics and strategies of the '80s 
battlefield. 

In this solitaire-only game, players 
can essentially design their own bat- 
tle. Choose a battalion, company or 
platoon to command. Select from five 
tactical scenarios — novice game, pur- 
suit and exploitation, meeting engage- 
continued on page 60 
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THE MOST CHALLENGING GAMES 
AT THE MOST REASONABLE PRICES 

| I MICROPROSE g °™ | | INFOCOM 



LIST OUR 
PRICE PRICE 



LIST 
PRICE 



OUR 
PRICE 



Battalion Commander 
Battle/Antietam 
Battle for Normandy 
Breakthrough/Ardennes 
Broadsides 
Carrier Force 
Colonial Conquest 
Combat Leader 
Computer Ambush 
Computer Baseball 
Computer Quarterback 
Cosmic Balance 
Cosmic Balance II 
Field of Fire 
50 Mission Crush 
Gemstone Warrior 
Imperium Galactum 
Kampfgruppe 
Kamp. Seen. Disk 
Knignts of the Desert 
Mecnbrigade NEW 
Nam NEW 
Op. Market Garden 
Panzer Grenadier 
Questron 
Rails West 
Reforger 88 
Six Gun Shootout 
U.S.A.A.F. NEW 
Tigers in the Snow 
War in Russia 
SSI Data Disks 



$40 $27 

S50 $33 

S40 $27 

S60 $40 

S40 $27 

$60 $40 

S40 $27 

$40 $27 

$60 $40 

$40 $27 

$40 $27 

$40 $27 

S40 $27 

$40 $27 

$40 $27 

$35 $23 

$40 $27 

$60 $40 

820 $15 

S40 $27 

860 $40 

840 $27 

850 $33 

$40 $27 

$50 $33 

$40 $27 

$60 $40 

$40 $27 

860 $40 

$40 $27 

$80 $53 

$15 $15 



Conflict in Vietnam NEW $40 $27 
Crusade in Europe 
Decision in the Desert 
F-15 

Kennedy Approach 
Mig Alley Ace 
Silent Service 
Solo Flight 
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40 $27 

40 $27 

35 $24 

35 $24 

35 $24 

35 $24 

$35 $24 



NEW! 
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SOFTWARE J 



♦ ATARI 520 ST 



LIST 
PRICE 



OUR^ 

PRICE 



BRODERBUND 



LIST 
PRICE 



OUR 
PRICE 



Brimstone (2 drives) 
Champ. Lode Runner 
Essex (2 drives) 
Lode Runner 
Lode Runner's Rescue 
Mask of the Sun 
Mindwheel (2 drives) 
Operation whirlwind 
Print Shop 
PS Grap. Lib. 1,2,3 
Serpent's Star 
Stealth 
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$40 
835 
840 
835 
830 
840 
840 
840 
845 
825 
830 
$30 



$27 
$23 
$27 
$23 
$20 
$27 
$27 
$27 
$30 
$17 
$20 
$20 



■ A Mind Forever Voy 

■ Amazon 

■ Brataccas 

■ Borrowed Time 

■ Crimson Crown 

■ Degas 

■ Deadline 

u Dragon World 

■ Enchanter 

■ Fahrenheit 451 
a Hacker 

n Hitchhiker's Guide 
u Infidel 
u Kings Quest II 
u Nine Princes 
u Sorcerer 

Spellbreaker 

Sundog 

Transylvania 
u Treasure Island 

■ Ultima II 

■ Wishbringer 

■ Zork I 
+fork //, /// 



ELEC. ARTS 



LIST OUR 
PRICE PRICE 
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Archon 

Archon II: Adept 
Movie Maker NEW 
M.U.L.E. 
One on One 
Racing Destr. Set NEW 
Seven Cities of Gold 
Ultima Ill-Origin Sys. 
Ultima IV-Origin Sys. 



TEVEX 

INCORPORATED 

1710 Wilwat Drive, Suite E 
Norcross.GA. 30093 
404-441-3045 

BEST SELECTION - We have carefully selected the best tides 

from the most challenging software avaliable. 
CALL TOLL-FREE - Call us to place an order or just to ask a 

question. Every call is always welcome on our 800 line. 
SAME DAY SHIPPING - We ship every order the same day it's 

placed. Just call before 4:00 pm and we'll ship your order UPS. 
DISCOUNT PRICES - Save up to 1/3 off the retail price when 

you buy from Tevex. Why pay more for the same software? 
FRIENDLY, KNOWLEDGEABLE STAFF - We are always 

available to answer your questions and keep you up to date on 

new & upcoming games. 

CALL TOLL-FREE 1-800-554-1162 

SAME DAY SHIPPING * 
WRITE FOR FREE CATALOG 



$24 $16 

S35 $23 

S35 $23 

S24 $16 

S35 $23 

S35 $24 

S35 $23 

S50 $33 

$60 $40 



Ballyhoo NEW $40 $27 

Cutthroats $35 $24 

Deadline $45 $30 

Enchanter $35 $24 

Fooblitzky NEW $40 $27 

Hitchhikers Guide $35 $24 

Infidel $40 $27 

Planetfall $35 $24 

Sorcerer $40 $27 

Spellbreaker $45 $30 

Suspect $40 $27 

Wishbringer $35 $24 

Zork I $35 $24 

Zork II, III $40 $27 

4-in-one-Sampler $8 $6 

Invisiclues $8 $6 



ACTIVISION 



LIST 
PRTCE 



OUR 
PRTCE 



Ghostbusters 

Great American CC Race 

Hacker 

Master of the Lamps 
Mindshadow 
Space Shuttle 
Star Bowl Football 
Star League Baseball 




IEPYX 



LIST 
PRICE 



OUR 
PRICE 



Ballblazer 
Eidolon 
Koronis Rift 
Rescue on Fractalus 
Summer Games 
Temple Apshai Trilogy 




[etc: 



LIST 
PRICE 



OUR 
PRICE 
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Alternate Reality $40 $27 

Beachhead $35 $23 

Chickamauga $35 $23 

Clash of Wills §40 $30 

Flight Simulator II $50 $33 

Halley Project §40 $27 

Micro League Baseball $40 $27 

MLB Team Disk $20 $15 

MLB General Manager $40 $27 

Napoleon at Waterloo $35 $25 

Sargon III $50 $33 

Spy vs Spy $30 $20 

Spy vs Spy II NEW $30 $20 

Star Fleet I $50 $33 

Blank Disks-Box of 10 DSDD 
only $12 
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INFOCOM 



JS 



ELECTRONIC 
ARTS 




Open 9-6 Mon. - Fri. 10-4 Sat. 



Georgia residents call 404-441-3045. ORDERING AND TERMS: C.O.D. orders welcome. When ordering by phone use VISA or MASTERCARD. When ordering by mail send 
personal check or money order. Include_phonc number. SHIPPING: Add $2.50 for shippingand handling charge. Gerogia residents add 4% sales tax. Shipping for Canadian 
orders is $4.00 or 5% of order. APO & FTO orders add $3.00 or 5% of order. Shipping for all other foricgn orders is $10.00 or 15% of order. • On all orders before 4:00 pm. 
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ment, attack, or defense. In every sce- 
nario except the novice, the player 
can choose from American, Russian 
and Chinese nationalities and deter- 
mine the strength of both opposing 
forces. 

Select a battlefield from a list of 40 
different terrain maps. The screen cur- 
sor responds well to the joystick and 
smoothly scrolls across multiple 
horizontal and vertical screens. The 
coordinates of each screen are dis- 
played at the top and the left. When 
the screen is scrolled horizontally, the 
top values change, When the screen 
is scrolled up or down, the left values 
change. With this system, the player 
can immediately see the exact loca- 
tions of both his own units and any 
visible enemies. 

Combat units are shown as sil- 
houettes depicting a tank for armored 
units, a truck for truck mounted units, 
an infantryman for dismounted 
troops, or two offset rectangles for 
platoons mounted in personnel car- 
riers. Each figure represents one pla- 
toon. Other silhouettes show burning 
vehicles, objective locations, artillery 
batteries and supply depots. 

A combination of joystick and key- 
board commands control the gamut 
of important battlefield orders. Units 
can be ordered to a specific location 
by accessing the platoon or company, 
followed by placing the cursor at the 
location and pressing the letter "G" 
for "Go to." Fire commands include 
orders for normal, suppressive and 
priority fire. Special commands are 
also included for smoke, digging in 
and removal or establishing bridges. 
In combat, the computer chooses the 
best targets of opportunity. 

The well-written rules booklet con- 
tains helpful information and a wel- 
come section on basic tactical doc- 
trine. Although this game simulates a 
slightly higher level of command, it 
is hard not to compare it to its SSI 
forerunner, Combat Leader. Both 
games use a very similar system of 
play. But I preferred Battalion Com- 
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mander because of its better map- 
board, improved unit graphics and 
greater selection of commands. 

SPY VS. SPY II mm 

First Star Software 
22 E. 41 Street 
New York, NY 10017 
(212) 532-4666 
5529.95, 48K disk 

Reviewed by Brad Kershaw 

Spy vs. Spy II, The Island Caper 

brings back the rival Black Spy and 
White Spy from MAD Magazine in 
their second computer game. 

This time, the object is to parachute 
onto a tropical island and find three 
missile parts that have been buried in 
different locations. You must assem- 
ble the parts and find your offshore 
submarine before time runs out. 




Each spy is equipped with several 
traps that are capable of ending the 
other's search quickly and perma- 
nently. There are also natural hazards, 
such as an active volcano waiting to 
erupt if you run out of time. All 
gadgets are accessed through the 
Super-Duper All-in-One Handy De- 
luxe Island Trapulator. This little 
goody has everything from a spy map 
window to some really nasty 
weapons. However, you must keep in 
mind that traps you set will work just 
as well on yourself as on your op- 
ponent. 

The game screen itself looks a lit- 
tle like the first Spy vs. Spy. Both 
players have their own independent 



half-screen showing exactly what mis- 
chief they are up to. This also allows 
both players to be on separate parts 
of the island and see what the other 
is planning. 

The sandy island is dotted with 
bumps indicating where things are 
buried. There may be parts of the mis- 
sile buried under the sand, or a trap 
waiting to get you, or more ammuni- 
tion to use against your opponent. 
You won't know what is lying in wait 
until you dig. 

You can choose one or two players, 
level of difficulty, and the IQ of the 
computer opponent. On each spy's 
screen is a Strength Meter that shows 
which parts of the missile have been 
accumulated, along with a digital 
timer and the various traps your spy 
has set. Naturally, the strength meter 
also shows how much strength you 
have left. Every time you fall prey to 
a trap or battle against your rival you 
lose some strength and can ultimately 
perish. It's true that you can regain 
strength by doing nothing. But that's 
no help when you are racing against 
the clock. 

Once you have avoided the traps 
and found the three pieces of the mis- 
sile, you still have not won. You must 
swim out and find your submarine. 
This would be fairly simple if not for 
the sharks. If you do find your sub and 
manage to swim out to it, you are re- 
warded. The hatch opens and a beau- 
tiful woman pops out to kiss you. You 
promptly enter the sub and sail away 
with her. 

I thought this game was consider- 
ably better than the first Spy vs. Spy. 
The traps were easier to set, the hand- 
to-hand combat seemed easier to con- 
trol. The volcano scene, the parachute 
scene and opening screens include 
some of the best animation I have 
seen since Ballblazer. Unlike certain 
movie sequels around today, this 
game is not a rehash. In fact, you will 
probably see me standing in line for 
Spy vs. Spy III. 
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SUPER BUYS!! 

130 XE PACKAGE 



1 30 XE152K Computer, 
1050 127K Disk Drive, 
1027 Letter Quality 
20 CPS Printer, PLUS 
5 Pieces of Software 



$ 379.95 




WE CARRY A COMPLETE LINE OF SOFTWARE. 
THE FOLLOWING IS JUST A SAMPLE OF OUR PRODUCTS. 



HARDWARE/PERIPHERALS 

520 ST COMPUTER with Modulator, 
Mouse, Logo, Basic, 1 st Word and 
NEOchrome Sampler $379.95 

520 ST PACKAGE (B/W) CALL 

Computer with Modulator, Mouse, Disk 
Drive, Monochrome Monitor and 
Software (Same as above) 

520 ST PACKAGE (Color) CALL 
Same as above but with RGB 
Color Monitor 

1040 ST Computer CALL 

SF 354 Disk Drive $179.95 

SF 314 Disk Drive $199.95 

SC 1424 Monitor $279.00 

SC 1224 Monitor $349.95 

SMM 804 Printer $199.95 

130 XE Computer CALL 

1050 Disk Drive CALL 

1025 Printer CALL 

1020 Printer $25.95 

XM 301 Modem $41.00 

1010 Recorder $44.00 

410 Recorder $15.00 

ATARI EDUCATOR KIT $29.95 

Includes: 410 Recorder, Basic Cartridge 
& States and Capitols (C) 

PROGRAMMER'S KIT $19.95 

Includes: Basic Cartridge, Inside Atari 
Basic Book &■ Basic Language Reference Manual 

ARCADE CHAMP KIT $24.95 

Includes: 2 Joysticks, 
Pac Man (R) & Qix (R) 

BASIC TUTOR KIT $29.00 

Includes: 3 Tapes on Basic & 2 Books 

BOOKKEEPER KIT $49.00 

Includes: Numeric Keypad, Bookkeeper 
Program & Manuals 
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ATARI 
POWER SUPPLIES 

$Q95 

LIMITED QUANTITIES 



ATARI SOFTWARE 

Atari Lab Light Module (R) $29.00 

Atari Lab Starter Kit 

w/Temp Module (R) $36.00 

Asteroids (R) $ 7.00 

Atariwriter (R) $29.00 

Atariwriter Plus (D) $39.00 

Basketball (R) $ 7.00 

Caverns of Mars (R) $12.00 

Defender (R) $ 7.00 

Dig Dug (R) $12.00 

Donkey Kong (R) $12.00 

Donkey Kong Jr. (R) $12.00 

Galaxian (R) $ 7.00 

Home Filing Manager (D) $24.00 

Joust (R) $12.00 

Jungle Hunt (R) $12.00 

Invitation to Programming 

Part 1 (C) $ 6.00 

Invitation to Programming 

Part 3 (C) $ 6.00 

Macro Assembler (D) $23.00 

Mickey in the Great Outdoors (D) $12.00 

Microsoft Basic II (D & R) $21.00 

Millipede (R) $12.00 

Missile Command (R) $ 7.00 

Moon Patrol (R) $12.00 

Ms. Pac Man (R) $12.00 

Music Composer (R) $ 7.00 

Pac Man (R) $12.00 

Paint (D) $16.00 

Pole Position (R) $12.00 

Proofreader (D) $15.00 

Robotron: 2084 (R) $12.00 

Skywriter (R) $12.00 

Star Raiders (R) $ 7.00 

Super Breakout (R) $ 7.00 

Timewise (D) $ 7.00 

Track & Field (R) $25.00 

Visicalc (D) $21.00 

Speed Reading (C) $14.00 

Touch Typing (C) $ 7.00 

Both For Only $17.00 

My First Alphabet (D) $ 7.00 

Juggle's Rainbow (C) $ 7.00 

Both For Only $11.00 

ATARI ST. SOFTWARE 

1 st Word $39 

DB Master One $39 

2 Key Accounting CALL 

NEOchrome $39 

Home Planetarium $24 

Joust $24 

CP/M Emulator $39 



TEDDY RUXPIN 




$65.00 


GRUBBY 




49.00 


The Adventure Series 


ea. 


10.00 


FOB Plush Hand Puppet 


ea. 


10.00 


Teddy Ruxpin Clothing 


starting at 


10.00 
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WE CARRY A FULL LINE OF PANASONIC, STAR, EPSON, 
OKI DATA AND LEGEND PRINTERS. CALL FOR CURRENT PRICES. 



i 



ELECTRONIC ARTS 

M.U.LE. XE/XL $17 

Music Construction Set XE/XL $17 

Realm of Impossibility XE/XL $17 

Seven Cities of Gold XE/XL $24 

Archon XE/XL $17 

Archon II XE/XL $24 

One On One XE/XL $24 

Pinball Construction XE/XL $17 

Murder/Zinderneuf XE/XL $17 

Moviemaker XE/XL $39 

Financial Cookbook ST/XE/XL $29 

Chess Master $20 

MICR0PR0SE 

Decision in the Desert XE/XL $27 

F 15 Strike Eagle XE/XL $25 

Kennedy Approach XE/XL $25 

Solo Flight (New) XE/XL $25 

Crusade in Europe XE/XL $27 

Aerojet XE/XL $27 

Silent Services XE/XL $27 

ACTIVISI0N 

Borrowed Time ST/XE/XL CALL 

Hacker ST/XE/XL CALL 

Mindshadow ST/XE/XL CALL 

The Music Studio ST/XE/XL CALL 

Great Am. Cross Country 

Rd. Race XE/XL $23 

Master of the Lamps XE/XL $23 

Ghostbusters XE/XL $23 

Space Shuttle XE/XL $23 

Designer's Pencil (R) XE/XL $23 

GAME STAR 

Star Bowl Football XE/XL $19 

Star League Baseball XE/XL $19 

On-Track Racing XE/XL $23 

Championship Golf IBM/ST CALL 

BATTERIES INCLUDED 

Degas ST $29 

Homepak ST/XE/XL CALL 

B/Graph XE/XL $29 

BR0DERBUND 

Print Shop XE/XL $35 

Paper Refill $16 

Graphic Library I, I, III XE/XL ea. $18 

Stealth XE/XL $23 

Karateka XE/XL $24 



INF0C0M 

ALL TITLES including BALLYHOO 
AVAILABLE FOR 520 ST/XE/XL 
PRICES AS LOW AS $25 

SUBLOGIC CORP 

Flight Simulator II ST/XE/XL $39 

Jet ST CALL 

Night Mission Pinball XE/XL $24 

HABA SYSTEMS 

Haba Word ST $79 

Haba Writer ST $59 

Hippo C Compiler ST $59 

VIP TECHNOLOGIES 

The VIP Professional ST $119 

SIERRA 

King's Quest II ST $34 

Ultima II ST $49 

Winnie the Pooh ST $34 

SPINNAKER/TELLARIUM 

Amazon ST $29 

Dragon World ST $29 

Fahrenheit 451 ST $29 

Homework Helper/Math ST $29 

Homework Helper/Writing ST $29 

Nine Princes in Amber ST $29 

Perry Mason ST $29 

SSI 

Kampfgruppe $35 

Field of Fire $24 

Operation Market Garden $30 

Computer Quarterback $24 

Broadsides $24 

Gemstone Warrior $22 

Computer Ambush $35 

Questron $35 

Colonial Conquest $24 

Battalion Commander $35 

Panzer Grenadier $24 

Battle of Antietam $30 

U.S.A.A.F $35 

RIBBONS 

Atari 1025 (Black) $2.50 

Atari 1025 (Color $3.50 

Panasonic 1091 $8.50 

Okimate 10 (Black) $6.00 

Okimate 10 (Color) $6.00 

Star Gemini (Black) $2.50 

Star Powertype $6.00 



PQ 



SUNC0M 



The Party Quiz Game 
Family Learning System 

Computer Question/Answer Game 

$-| Q95 




LIMITED QUANTITIES 



ALL TITLES ON DISK UNLESS MARKED (R) FOR ROM CARTRIDGE 
Order Line WE CHECK FOR STOLEN VISA & MASTERCARD Customer Service 

1 Qfin 9ft9 HQQQ & Ohio Residents 

l-BUU-l&Z-IKKtf M-F 10 a.m.-7 p.m.; Sat. 10-3 ET <l R1 o o 7Q qcqq 

ORDERS ONLY! Sales Personnel Do r I -DJO-O/O-OTOT 

Not Have information on 37 s. Broad Street, Fairborn, OH 45324 Wi\lW!IM\UM 



Previous Orders or Product Specs. 



& Ohio Residents 

1- 513-879-96 99 



|r___l 



SOFTWARE ONLY — Prepaid orders over $50 receive free shipping via UPS in continental U.S. Please add $2 orders under $50. HARDWARE and all 
orders requiring shipment via U.S. Post Office are subject to additional freight charges. Add $5 for COD orders. VISA /MasterCard orders add $2 service 
charge. Ohio residents add 5.5% sales tax. Personal checks require a three-week waiting period. No waiting when paid by credit card, certified check 
or money order. All items subject to availability and price change. PLEASE CITE AD NUMBER WHEN ORDERING. ALL RETURNS MUST BE ACCOM- 
PANIED BY AN AUTHORIZATION NUMBER. 



new products 



New Products notices are compiled by the 
I Antic staff from information provided by 

the products' manufacturers. Antic wel- 
\ comes such submissions, but assumes no 
\ responsibility for the accuracy of these 

notices or the performance of the 

products listed. 

CRIMSON CROWN, 

TRANSYLVANIA HHHW 

(entertainment software) 
Polarware/Penguin Software 
P.O. Box 311 
Geneva, IL 60134 
(312) 232-1984 
$34.95, 48K disk 

The Comprehend Interactive Novel 
Series— already a hit on the Apple, 
Atari 520ST and other computers— 
now comes to the 8-bit Ataris. Other 
titles in this graphic adventure game 
series include The Quest, Coveted 
Mirror, Oo*Topos, and Frank & 
Ernest's Adventure. 



SCREENS 

(utility software) 
Soft Cellar 
P.O. Box 16393 
Rochester, NY 14616 
#19.95, 32K disk 

It's a lot easier to create windows in 
your programs with this 100% ma- 
chine language utility that works with 
BASIC or CIO calls. Screens supports 
as many as nine independent windows 
with positioned text and display 
effects. 



BUSINESS MANAGER Hi 

(office software) 
Reeves Software 
29W150 Old Farm Lane 
Warrenville, IL 60555 
(312) 393-2317 
$49.95, 48K disk 

A complete business program for the 
Atari computer. Includes everything 
from invoicing to shipping to tax 
totals. 



PAPERCLIP with SPELLPACK 

(word processor) 
Batteries Included 
30 Mural Street 
Richmond Hills, Ontario 
14B 15B Canada 
(416) 881-9941 
$59.95, 128K disk 

A new version of the popular 
Paperclip word processor, featuring 
the SpellPack 30,000-word spelling 
checker, has been released for the Atari 
130XE. The spelling checker is resident 
in RAM for speedy access. 




SILENT BUTLER, 
MUSIC PAINTER 

(software) 

1196 Borregas Avenue 
Sunnyvale, CA 94086 
(408) 745-2000 
48K disk 

Silent Butler ($24.95) is a complete 
personal finance program that features 
check printing. Music Painter 
($19- 95) is a real-time musical compo- 
sition program that paints notes on the 
screen in color. 

ADVAN BASIC UPDATES Hi 

(utility software) 
Advan Language Designs 
P.O. Box 159 
Baldwin/Kansas 66006 
(913) 594-3420 
48K disk 

Advan has two new enhancement utili- 
ties for their BASIC Compiler which 
was reviewed in the April, 1986 Antic. 
Utility Programs ($29.95) includes 



the much-needed runtime module. It 
also has variable cross referencing and 
renumbering, as well as new BASIC 
keywords to call DOS functions, con- 
vert numbers from one base to an- 
other, and perform matrix 
mathematics. 

Screen Design ($29.95) helps cre- 
ate complex graphic screens. It does 
custom display lists, using all 16 text 
and graphics modes, horizontal and 
vertical smooth scrolling, and custom 
character sets. It includes PLOT and 
LOCATE commands which also work 
on mixed mode screens. The package 
includes a sophisticated drawing pro- 
gram and a character set editor. 
Screens created here can be used in 
Advan BASIC programs with the 
LSCREEN command. 

The latest version of the highly rated 
Advan BASIC Compiler ($49.95) now 
includes a conversion utility to trans- 
late "many, but by no means all" Atari 
BASIC programs into Advan BASIC. It 
also has new commands to set the sys- 
tem default to real (floating point) or 
integer numbers and is now recom- 
mended for 4 8K Atari 400/800 as well 
as the XL/XE. 

600XL 64K KIT ■■■■■ 

(memory upgrade) 
Computer Service Land 
1073 W. Broad Street 
Falls Church, VA 22046 
(703) 237-2930 
$30 ($45 installed) 

Give your Atari 600XL a full 64K 
memory like the 800XL. The modifica- 
tion kit comes with step by step in- 
structions. Requires a small amount of 
soldering and can be installed in less 
than an hour. 



I Return the favor. When you call a 
) manufacturer or supplier about a 
\ product you 've seen advertised or other- 
I wise mentioned in ANTIC, please tell 
them so. This will help us to continue to 
I bring you the latest information about 
\ products that will make your Atari com- 
l puteran even more valuable investment 
\ in the future. —ANTIC ED Q 
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C'mon 
Cut it out! 

Can $49.95 buy me an Atari 1030 Modem 
and software package? 



YES An Atari 1030 Modem guaranteed to 
work with your Atari Computer ean be yours— 
all you need is at least 16K and a telephone 
line— you don t even need a disk drive. 

The Atari 1030 Modem is an easy 
to use, high tech, high qual- 
ity modem which auto- 
matically uploads to your 
Atari Computer. 



And, with a disk drive 





can take advantage of the disk communication 
software (included at no extra cost). This free 
package also includes introductory subscriptions 
to Compuserve ( access to hundreds of free pro- 
grams) and Dow Jones Retrieval Services at 
no additional cost. 

Cut it out! Don't wait! Act now! 
Take advantage of this incredible 
offer— Atari quality at a lower 
price than any other modem! 

NO INTERFACE REQUIRED 



Send coupon to: 
ADD-ON Systems -524 2nd St., San Francisco, CA <M107 



YES! I want this extraordinary communications value! I'm ordering now so I can receive: 

• 1 ATARI 1030 300 baud modem with built in software* Free Introductory Time on: Dow Jones, Compuserve* Disk Communications Software 



The suggested retail value is S 199.95 MY PRICE IS ONLY $49.95 Send me . 



. number of packages at $49.95 per package to: 



Name 



Address 



City 



State 



a,. 



Please make check payable to ADD-ON Systems. Credit Card Orders Only Call Toll Free 

Payment enclosed fi I check □ money order 

Bill my □ Mastercard □ Visa v ' 

California residents add b x k% sales tax. 



ID# 



Expires 



Add shipping charges of S2.75 per modem. 



Canadian residents please send U.S. dollars. 
Allow 2-4 weeks for delivery. 
Prices subject to change without notice. 
Delivery subject to availability. 



The Price War Is Over 

We Will Beat Any Price 
Anywhere 



Atari ST 
Software 

Borrowed Time $31.00 

Chat $13.00 

Final Word $79.00 

Haba Software Cheap 

Hacker $23.00 

H * D Base Call 

H ft D Forth Call 

H 4 D Toolboi Call 

PC Intercomm $69.00 

Personal Diakit Call 

Sundog $22.00 

VIP Professional ... Call 

Silent Service $24.00 

Flight Simulator .... Call 

Micro C Shell Call 

Mindshadow $31.00 

Print Master $24.96 

P. M. Art Gallery $19.96 

Avatei 1200 $39.00 Easy Draw Call 

QMI 1200ST $129.00 Graphic Artist Call 

Hayes 1200 Call Music Studio $37.60 

Atari XM301 $37.96 2Key Accounting . $32.99 

Supra/MPP 1000E $37.60 



Atari ST 
Hardware 

Atari 1040ST Call 

Atari 620ST RGB Call 

Atari 620ST Mono Call 

Atari 620ST (CPU) Call 

Atari SF364 Call 

Atari SF314 Call 

Atari SM124 Call 

Atari SC1224 Call 

ST Station Call 

Supra Hard Disk Call 

Printers 

Panasonic Call 

Epson Call 

Citiien Call 

Modems 



June 
S pectals 

Avatex 1200 
PR Conn./Amodem .... $1+9.00 

Atarivriter Plus $24.96 

Avatex 1200 $39.00 

Sakata SC100 $123.96 

Teknika MJ-10 $173.00 

Teknika MJ-22 Call 



Home Planetarium $19.76 
Joust $19.76 




Avatex 1200 

$8930 

Hayes Compatible! 
Everyday 



CP/M Emulator 


$32.99 


Apple ][ Emulator 


Call 


IBM Emulator 


Call 


Megamai C 


Call 


Metacomco Pascal Call 


Lattice C 


Call 


GST C 


Call 


Andra 


Call 


UCSD Pascal 


Call 


Regent Spell 


Call 


Regent Word 


$36.00 


Regent Word II 


$36.00 


Regent Base 


Call 


VIP Lite 


Call 


Micro C Shell 


Call 


Rubber Stamp 


Call 


Megafont II 


Call 


Meta 63000 Asm .. 


Call 


Brattacas 


Call 


Degas 


$24.96 


Personal Pascal 


$39.00 


ST Talk 


$13.00 


Typesetter ST 


$24.00 



Atari 8-Bit 

Hardware 

Atari 130XE $116.00 

Atari 66XE Call 

Atari 1060 Call 

Indus GT $133.00 

Atari XCll Call 

Atari 1027 $93.00 

Accessories 

US Doubler $42.00 

Rambo XL $29.96 

R-Time Cart $43.00 

The Duplicator Call 

Indus Expander Call 

Bonus SS/DD 6.26 $6.99 

BonuB DS/DD 5.26 .. . $7.60 
Flip ft File All Siies ..Call 

Paper 1000 Sheets $11.00 

Paper 2600 Sheets Call 

Maxell 3.6 $19.00 

Sony 3.6 $21.00 

Fuji 3.6 $19.00 

Interfaces 

P:R: Connection $56.00 

Supra Microprint $29.00 

Supra 1160 $39.00 

Supra Micronet $149.00 

Supra Microstuffer ... $67.00 

U-Print $43.00 

Apeface Call 

Atari 360 Call 

ST Printer Cable $8.99 




Zoomracks $43.99 



Atari 130XE 

$115.00 

I28K Of Memory! 



Atari S-Bit 
Software 

Aerojet $19.50 

Action! $42.00 

Basic XE $42.00 

Basic XL $33.96 

Battalion Command .. $24.95 
Battle of Antietam ... $32.00 

B/Graph $24.96 

Broadsides $24.96 

Computer Baseball $24.96 

Computer QB $24.96 

Conflict in Nam $19.00 

Crusade in Europe $24.96 

Silent Butler $19.99 

Gemstone Warrior $22.00 

War in Russia $48.00 

Dec. In the Desert $24.96 

Kennedy Approach ... $19.60 

Solo Flight $19.60 

Learning Phone Call 

Syncalc 130XE $29.96 

Megafont 11+ $17.00 

Rubber Stamp $18.00 

Paperclip $36.99 

Mac/66 $42.00 

Print Shop $26.00 

Karateka $18.60 

Lode Runner $22.00 

Atarivriter Plus $24.96 

Panier Grenadier $34.00 

Hacker $19.60 

Space Shuttle $16.75 

Mindshadow $16.76 

Great Am. Rd. Rce .... $16.76 

F-16 Strike Eagle $24.96 

Silent Service $19.60 

GunBhip $19.&0 

Synfile 130XE $29.95 

Page Designer $18.00 

Typesetter $21.00 

HomePak $31.00 

OSS Toolkits $17.99 

Printshop Lib. 1/2/3 .. $1& Q 6 

Chmp. Lode Run $18.60 

Ultima IV $39.00 

Sparta Dos CS $24.96 

Home File Manager ... $7.99 

Music Painter $7.99 

Star Raiders $7.99 



Low Price / Modula-2 Call 

Personal Prolog Call 

Kings Quest II Call 



Lowest Price Anywhere! 



Black Mch Systems 

TO ORDER (Visa, MasterCard): Call TOLL FREE 1-800-ATARI-02 

For technical information, order inquiries, or for MD orders call 301-757-1329, or write 
Black Patch Systems, P.O. Box 501, Arnold, MD 21012 

Risk Free Policy: In-stock items shipped within 24 hours of order. No deposit on C.O.D. orders. Free shipping on prepaid cash orders within the continental U.S. Volume discounts 
available. MD residents add sales tax. APO. FPO. and international orders and $5.00 plus 3% for priority mail service. Advertised prices show 4% discount for cash, add 4% for 
MasterCard or Visa. Personal checks require 4 weeks clearance before shipping. Ask about UPS Blue and Red label shipping. All merchandise carried under manufacturer's 
warranty. Free catalog with order. All items subject to change without notice. Dealer Inquiries Invited 



If ^oo compete after darfy.. 
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.^vitch to tl)e magic 

cf GEnie andsfa^ 
on-line longer, for less? 

Introducing GEnie, the General Electric Network 
forjnformation Exchange. It's part of General Electric 
Information Services— the largest commercial teleproces- 
sing network. 

Now the power of GEnie stands ready to bring a little 
magic into the life of PC owners just like you. And for poten- 
tially much less than other on-line information services. 

With GEnie, you pay no hidden charges or monthly 
minimum fees. You pay only for the actual time you're 
on-line and the $18.00 registration fee. Nothing more. 




Compare & Save 




Services 


Pricing 


SIGs/User 
Groups 


Electronic 
Mail 


CB Simulator 


Computing 
News 


Games 


2400 baud 
access 


Registration 
fee 


Monthly 
minimum 


Non-prime time rates 


300 baud 


1200 baud 


GEnie* 


X 


X 


X 


X 


X 


X 


$18.00 


none 


$5.00 


$5.00 


CompuServe 


X 


X 


X 


X 


X 


X 


$39.95 


none 


$6.25 


$12.75 


The Source 


X 


X 


no 


X 


X 


X 


$49.95 


$10.00 


$8.40 


$10.80 



*Rates and Sen/ices shown in effect 12/85. Non-prime time rate applies Mon-Fri, 6pm-8am local time, all day Sat., Sun., and nat'l. holidays. Subject to service availability. 

Additional surcharge applies for 2400 baud service. 



Save up to 60% 

Check out the chart above and compare it for yourself. You'll find 
GEnie can deliver all of your favorite services for an incomparable 
price at incomparable savings! 

Put the power of GEnie at your command 

• Discuss the latest in computer products and accessories or 
download public domain software with GEnie's RoundTable™ 
Special Interest Groups. 

• Meet new people, share ideas with friends— old and new— with 
LiveWire™ , GEnie's CB simulator that has everybody talking! 

• Get your message across and back again with GE Mail ™, 
GEnie's electronic mail service. 

• Organize a local, regional or national get-together in one of 
GEnie's 40 "conference rooms" with GEnie's Business Band 
Real-Time Conferencing. 

• Go one-on-one with classic computer games, match your wits 
against others with multi-player games, or download for future 
play in GEnie's Game Room. 

• Stay in touch with what's new on the microcomputer scene, 
courtesy of GEnie's news service, News and Commentary. 

GEnie can take you to new highs in speed and keep you there. 
Because our non-prime time rate for 300 OR 1 200 baud is only 
$5.00 an hour. And that means you save 20 to 60%. Or if you 
prefer, 2400 baud service is now available. 

With services and prices like these— talk, read, learn, or play to 
your heart's content. Because now you can keep your eyes on the 
screen, not on the clock. 



With your personal computer, modem, communications software, 
and telephone, you already have everything you need to make 
GEnie come to life. So why not Sign-Up today. Let GEnie bring a 
little magic into your life! 

Sign Up From Your Keyboard Today 
4 Easy Steps: 

1 . Have ready your VISA, MasterCard or checking account 
number to set up your personal GEnie account. 

2. Set your modem for half duplex (local echo)— 300 or 1200 baud. 

3. Dial 1-800-638-8369. When connected, enter HHH 

4. At the U# = prompt, enter XJM11947,GENIE then RETURN. 

No Modem Yet? Need more information or assistance? 
We can help! Call 1-800-638-9636, ext. 21. 



Get on-line with GEnie. And stay longer, for less. 



INFORMATION 

W5Sf7 SERVICES 



General Electric Information Services Company, U.S.A. 



Antic Publishing 
presents the definitive 
word in ST coverage: 

START, the ST Quarterly 

Look to START for new articles and 
programs detailing the architecture, 
applications, programming techniques and 
products necessary to master the Atari 
520 ST and 1040 ST. Look for START 
with a disk of software on June 1, 1986, 
wherever Antic Magazine is available. 




Complete ST cover 



4 issues of START, the ST Quarterly 
(with disk), plus 12 issues of Antic (ST 
Resource included). 
Mail the attached card today! 
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INTERACTIVE NOVELS vAtfi mapkicj 

. . . depth, vocabulary, and understanding previously found only in 
all-text adventures . . . 



. . . bring your journey to life with stunning graphics, Polarw are /Penguin 





THE 
CRIMSO 

CROWN ? 



THE 

COVETED 
MIRROR" 



COMPREHEND Interactive Novels are or will be available for Apple, 
Macintosh, Atari XL, XE, and ST series, Commodore 64 and 128, Amiga, 
and IBM PC /PC jr. and compatibles. 

from Polarw are /Penguin Software, Inc. 

of Apple Computer. Inc. and Macintosh is a trademark licensed to Apple Computer. Inc.; Commodore and Amiaa are 



Software for 
the Atari 520ST 



H&DBase 

Relational Database Management 
Language for the Atari 520ST® Computer 

H&DBase is a Relational Database Management Language 
which allows novice and expert users alike to manipulate any 
type of data through the use of straight-forward, English-like 
commands. 

For the novice, H&D Base is an interactive data storage and 
retrieval package suitable for maintaining phone directories, 
club rosters, genealogies and more. 

For experienced users, it is a system development package 
containing its own programming language. A skilled 
programmer can use H&D Base to create a system for handling 
inventories, accounts payable and receivable, client lists, and 
other programs which would normally be written in more 
cumbersome languages. 

Regardless of the level of user expertise, H&DBase is the 
perfect tool for data management. 

PROGRAM HIGHLIGHTS: 

• Comprehensive Manual: Introduction, Starting-up, Tutorial, 
Reference, Appendices & Index Sections plus Reference Card 

• On-screen "Help" System 

• Elementary Text Editor 

• Powerful Report Generator with Saved Report Forms 

• Sort on any Field to any Level 

• Full Math Capability on any Field or Variable 

• Disk Based System: Only Size Limitation is Disk Capacity 

• Compatible with most "dBASEII"® Command Files 

• Compatible with all "SDF" and "Delimited" Data Files 

• Over 275 FORTH Commands (including "calls" to the GEM® 
Interface - Atari "Developer's Kit " required ) 

• Add Your Own Commands 

• Create Auto-run Applications 

• Includes Sample GEM Mailing List Program (written in 
H&DBase) 

• Run-time Developer's Package Available 

• Source Level Maintenance 

• Not Copy Protected 
SUGGESTED LIST PRICE: $99.95 

ALSO AVAILABLE FOR THE ATARI 520ST® : 

Toolbox - Volume One- $39.95 - Five Invaluable Utilities 
H&D Forth - $49.95 - FORTH Programming Language 

For information: (800) 641-1441 
In California, call: (800) 641-1442 
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HippoVision Video Digitizer $139.95 

Creates digitized Degas and NEOchrome-compatible pic- 
ture files using any standard composite video input (e.g. 
color or b&w camera, VCR, TV, etc. . .). Fast software 
updates the ST's screen 10 times per second, while the 
hardware frame-grabber snaps pictures in 1/60 of a second. 
Animation mode allows automatic sequential frame 
digitization. Black and white high contrast mode or up to 
16 grey levels with color monitors. 320H X 250V resolution. 
Routine allows direct access to pixel data. NTSC, PAL, and 
SECAM compatible. Includes hardware, software, demos, 
and instructions. 




Hippo ST Sound Digitizer $139.95 

Digitally sample, edit, mix, and play high-quality sounds 
with your ST. Mouse-based editing of waveforms, volumes, 
echos, and sound sequences. Real-time oscilloscope. Voice 
recognition demo. Four polyphonic sounds, multi-track. 
Normal sampling rate of 22,000 samples per second allows 
frequencies of up to 11 Khz. Up to 40 seconds of sounds can 
be stored with 1 Meg of RAM. High-speed 8 bit analqg-to- 
digital and digital-to-analog converters allow up to 400,000 
samples per second. Use any standard audio input. Connect 
output to guitar amp or home hi-fi for increased fidelity. 
Input and output level controls. Includes hardware, 
software, sound library, microphone, power supply, cable, 
and instructions. 



Our other products: 

HippoWord Advanced word processor with true fonts. $89.95 

HippoConcept Powerful multi-level idea processor. $89.95 

HippoSimple Powerful database. Sort, merge, ten commands. $49.95 

HippoSpell Word statistics plus a 30,000 word dictionary. $39.95 

HippoPixel Create new fonts or animation sequences. $39.95 

HippoFonts I Additional fonts for HippoWord. $39.95 

HippoDisk Utilities Edit RAM, track & sectors. Recover data. $49.95 

HippoRAMdisk Turn extra RAM into an ultra fast disk drive. $34.95 

HippoBackgammon Animated color or B&W graphics. Robot players. $39.95 

Hippo Computer Almanac Understands English, 35,000 various facts. $34.95 

Hippo Jokes & Quotes Thousands of jokes, quotes, and puns. Not for children. $34.95 

HippoArt NEOchrome-compatible art files. Slide show program. $39.95 

HippoClean Disk cleaning kit includes disk, fluid, and instructions. $29.95 

Hippo EPROM burner Reads, verifies, edits, and burns most EPROMS. $139.95 

Hippo X-10 Powerhouse Control household 120V devices using existing wiring. $139.95 

Uncopyprotected and updated versions available. 

Dealer Inquiries Invited. See your local dealer or order direct from Hippopotamus. VISA, 
Mastercard, COD, and institutional purchase orders accepted. California residents add local sales 
tax. Please include $3 for shipping. Price, availability, and specifications subject to change without 
notice. 




HIPPOPODVVTUS 



SOFTWARE. INC. 



985 University Ave., Suite 12 
Los Gatos, CA 95030 
408/395-3190 Telex: 650-284-0701 



fl^Go for the power. 

" Do you have to give up power and advanced potential 

to get ease of use and af fordability? Not anymore. 
Because now, you can have UCSD Pascal for only $79.95! 



If you're making your move into 
programming, there's no better way 
to go than Pascal. And starting now, 
you dont have to settle for 
a stripped -down 
version of Pascal 
in order to get a price 
thafs right. Instead, 
you can choose UCSD Pascal 
recognized Pascal programming 
standard in colleges and uni- 
versities throughout the 
country -at the incredibly 
low introductory price 
of $79.95 for your 
PC-DOS, MS-DOS, or 
other popular computer. 

The standard — on your 
Atari ST! 

The latest powerful release of UCSD' 
Pascal is now available for your Atari 
ST computer. In addition to the 
impressive array of features included 
in all implementations of UCSD 
Pascal, you have TOS compatibility 
and access to TOS system calls. 
You can utilize the graphics 
capabilities of your Atari ST with the 
special Atari ST Turtlegraphics unit, 
included in the package. And you 
can easily move your program to 
and from any other computer 
running UCSD Pascal! 

UCSD Pascal 

has everything you need 

With UCSD Pascal, you get a 





I, ^ sophisticated pro 




full-featured, 

professional programming tool thafs 
being used right now in the 
development of major scientific and 
business applications. The system 
comes with an outstanding text 
editor, a complete on-line tutorial, 
8087 math coprocessor support and 
BCD (decimal arithmetic) included in 
the package at no extra cost. In fact, 
UCSD Pascal contains 
virtually everything you 
need -as standard 
0 equipment -for devel- 

oping the simplest 



I programs. 
UCSD Pascal is available for 
MS-DOS, PC-DOS, UNIX, VMS, 
MSX and many other operating 
systems. You can use UCSD Pascal 
to write programs of any size on 
virtually any computer, and port 
them to any other computer. And if 
speed is what you're after, the latest 
native code version of UCSD Pascal 
actually benchmarks favorably 
with Turbo Pascal in 
execution time! ^ * 



Programming that's easy 
...and fun! 

At Pecan Software Systems, we 
strongly believe programming 
should be as easy as possible. 
JJCSD Pascal was originally designed 
for teaching programming 
skills, so ifs extremely 
easy to learn and to use. 
With UCSD Pascal, you'll 
be developing programs right 
from the start that are 
easy to write, easy to 
understand, and easy to 
maintain. We also believe 
that programming should 
be fun. So we've made UCSD Pascal 
as enjoyable to use as it is powerful. 

The right tool at the 
right price 

When the fun gets serious, you'll 
have a comprehensive programming 
system right at your fingertips with 
UCSD Pascal -a system that will 
help you develop those big-league 
programs you may eventually want 
to write -at a price you can readily 
afford. 

Put UCSD Pascal programming 
power on your PC now for only 
$79.95! Order by mail today or phone 
now 1-800-63-PECAN. UCSD Pascal 
-the original standard of Pascal pro- 
gramming excellence. The new 
leader in Pascal price/ 
performance. 



m SWinU Wl to the most ^^^^^ 

The UCSD Pascal Company ^^^m^*^^ i 

Pecan Software Systems, Inc. 

1410 39th Street, Brooklyn, NY 11218 ^0 ^^fr^hQ 

718-851-3100 ^ ^ ^^^pjJ^N^p^^^ 
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Part II: Irxtothe/T 



by DAVID and SANDY SMALL 



This is the second of three articles detailing exception 
and interrupt theory for the Atari ST computers. This se- 
ries is aimed primarily at advanced or intermediate pro- 
grammers. Last month, the Smalls laid the foundation 
by discussing interrupts on the 6502 microprocessor. In 
this issue, they plunge ahead with the 68000. 

Before beginning however, you should note that part 
of the discussion deals with interrupts as they are im- 
plemented specifically for the ST. This is a superset of the 
normal 68000 interrupts, helped along by the STs spe- 
cial chips. Not all aspects of the following material will 
necessarily work on other 68000 computers such as the 
Macintosh.— SI RESOURCE 

Last month we were continually referring to "interrupts" 
on the 6502. Well, now we can tell you that the 68000 
microprocessor doesn't have interrupts. It has "excep- 
tions". Exceptions, says the Motorola book, are "excep- 
tions to normal processing." Doesn't this sound like an 
interrupt? Does to me. But there's more to it than just an 
interrupt. 

First, let's discuss "Interrupt Exceptions," one type of 
exception that is close to the 6502 type of interrupt. 

There are three pins that input to the 68000, called 
IPL0, IPL1, and IPL2. IPL stands for Interrupt Priority 
Level. Whenever something (namely, the ST chip called 
GLUE) trips these pins, an interrupt is generated. But there's 
a catch — the interrupt may be ignored, depending on the 
"current processor interrupt priority level" (IPL), a regis- 
ter within the 68000. 



Eight 
Internal IRQ's 
4 Timers— 4 Modem 



68000 



Modem 



MFP 



, Keyboard 

Eight 
External 
IRQ's 

Disk 



IPL0 



IPL1 



IPL2 



GLUE 




16 Possible 
Interrupts 



VBLANK 
HBLANK 



MFP vs. Screen Interrupts 

Note: Don't confuse the IPL pins, which I have printed 
in bold type, with the IPL register. The IPL register is part 
of the general Status Register (SR) that tells the 68000 
which interrupts to handle, and which to ignore. (So it's 
the "masking" part of the interrupt system). 

INTERRUPT LEVELS 

There are 8 levels of interrupts, starting at 0 and ending 
at 7. They are organized like this: Level 0 interrupts are 
strictly low priority stuff (like a 6502 IRQ); Level 7 has 
the interrupts that Really Ought To Be Dealt With Right 
Now, No Fooling Around (like a 6502 NMI). You place 
a number from 0 to 7 in the IPL. The 68000 then ignores 
any interrupts equal to or below your current IPL level. 

You find the IPL as the low 3 bits of the high byte of 
the status register. The status register is 16 bits, and the 
IPL bits (0-7) are as follows: 

xxxx xipl xxxx xxxx 
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You can move into, AND, OR, XOR, or whatever, to the 
status register to set the IPL. For instance, to set IPL = 2, 
you could move.w ##0200,SR. There's more to it than 
that, and we'll get to it in a moment. 

<Hacker Note: The "below," two paragraphs above, is 
"equal to or below", not simply "below". If you are at 
IPL = 4 and you get a Level 4 interrupt, the 68000 will ig- 
nore it. Careful!> 

An example? Okay. At the beginning of every horizon- 
tal TV line (HBLANK), the 68000 gets a Level 2 interrupt. 
If we handled each one of these interrupts, a great deal 
of the 68000's time would be taken up without reason. 
So we set the IPL to 3, and the 68000 ignores Level 2 in- 
terrupts. 

<Hacker Note: The interrupt remains "pending." But 
as long as the IPL stays above or equal to 2, it isn't dealt 
with. However, if you ever let the IPL slip to below 2, even 
for one instruction, you're going to be interrupted. Sup- 
pose we were masking a 5 into the IPL by getting rid of 
the old bits with an ANDI and then adding the new bits 
with an ORI: 

ANDI.W #$F0FF,SR Mask off old IPL bits 

ORI.W #$0500,SR Put in new IPL bits 

You'll be at IPL 0 for a moment after the AND, and all 
sorts of unpleasant things may happen. Careful! A better 
idea is to copy the SR into a temporary data register, modify 
the IPL there, then copy it back in one instruction. > 

Now, let's say an applications program sets the IPL down 
to 0. (It shouldn't, but many 68000 programs do.) An 
HBLANK interrupt occurs. You know what the Atari en- 
gineers do? They handle this by setting the IPL back up 
to 3, and returning — nothing else — thus disabling the 
HBLANKs again. Of course, if you need HBLANKS, 
primarily for fancy graphics, you can use the HBLANK 
vector. 

What interrupts are hooked up this way? There are: 
HBLANK — Level 2. This tries to happen every time we 

start a new scan line — very often. It is usually not allowed 

to happen. 

VB LANK— Level 4. This tries to happen every l/70th 
of a second in monochrome. It is usually allowed to hap- 
pen. (PAL color runs on the ST at 50 refreshes per sec- 
ond, NTSC color runs at 60.) If you are a 6502 program- 
mer used to a standard l/60th of a second vertical blank 
rate, you will need to readjust your thinking. 

MFP — Level 6. These are a whole new breed, which we 
will talk about shortly. Generally, they are always allowed 
to happen. 

If you're a hardware type, you'll see that there are no 
odd numbered interrupts. The lowest interrupt request 
line, IPL0, is tied off to nothing. The three IPL pins are 
a binary code for the interrupt request priority level. This 
means-. No odd numbered interrupt requests exist on the 
ST. IPL1 hooks to HBLANK, IPL2 hooks to VBLANK, 
through the GLUE chip. Ordinarily, IPL1 (Level 2 inter- 
rupt) gets triggered each HBLANK, and IPL2 (Level 4 in- 
terrupt) gets triggered each VBLANK. As I said before, the 



68000 generally lives at IPL 3, so it ignores Level 2, but 
responds to Level 4 and above. 

MFP (Multifunction Peripheral Controller) interrupts, 
which we'll get to in a moment, are Level 6 (both IPL1 
and IPL2 triggered). The GLUE chip temporarily unhooks 
the IPL lines from HBLANK and VBLANK, and trips them 
together to get a Level 6 interrupt request when the MFP 
chip asks. 

The IPL 2 and IPL 4 interrupts are known as "auto-vector 
interrupts". This is a flavor of interrupt for the 68000. 
There are two flavors of interrupts: auto-vector and user- 
vector. In the auto-vector mode, the 68000 is told to in- 
terrupt, and given a priority level. It figures out the "auto 
vector address" all by itself. This address contains the ad- 
dress of the interrupt handler. In other words, the 68000 
looks up the address to jump to, for handling the interrupt. 

The table is located in low memory, and looks like this: 

AUTO-VECTOR INTERRUPT 
EXCEPTION TABLE 

$64 — Level 1 interrupt handler address (bomb) 

$68 — Level 2 interrupt handler address— HBLANK 
HANDLER 

$6C— Level 3 interrupt handler address (bomb) 

$70— Level 4 interrupt handler address— VBLANK 
HANDLER 

$74— Level 5 interrupt handler address (bomb) 
$78 — Level 6 interrupt handler address (bomb) 
$7C — Level 7 interrupt handler address (bomb) 

If you look at location $68, you will see a 4-byte ad- 
dress. At that 4-byte address is the HBLANK handler we 
talked about a moment ago. Remember, this is a table of 
addresses . . . pointers, if you will. 

When the 68000 gets a Level 2 interrupt, it looks up 
the address that's been placed in $68, and starts execut- 
ing at whatever address it found there. If S68 contains 
SFC001234, the 68000 will jump to SFC001234. 

BOMBS 

Note the addresses that are marked (bomb). Since we're 
not supposed to get interrupts like these, they go to a spe- 
cial diagnostic to let you know that something is terribly 
wrong. (In this case, you may have a hardware problem. 
Perhaps the GLUE chip is not socketed properly). The er- 
ror handler generates a row of bombs onscreen. (In the 
older disk TOS, the error symbols were mushroom 
clouds.) Then it tries to restart GEM. 

<Hacker Note: GEM is restarted by using the Terminate 
Process call. It works //things aren't too badly fouled up 
(such as RAM data structures). However, be forewarned. 
Terminate Process can seem to work — yet things in mem- 
ory are still left damaged. 

Even RESET does not necessarily cure a memory table 

continued on next pase 
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damage problem. You may have to power off, then on 
to cure some problems. The RESET routine looks at two 
memory locations to see if memory was ever initialized. 
If it has been initialized, various tables of memory are not 
re-initialized by RESET. So if you press RESET and tables 
in "already initialized" memory are damaged, they won't 
get fixed. 

MFP INTERRUPTS 

Now things get a bit trickier. Let's talk about the other 
style of interrupts, which are MFP interrupts. 

As far as I have been able to determine, MFP interrupts 
are Level 6 interrupts. They quit happening if your IPL 
is 6 or above. 

When the 68000 is told to interrupt, a complex set of 
events takes place on the system bus. It boils down to this: 
The 68000 can either be told where to go, or figure this 
out for itself. The GLUE chip determines this. When we 
get an HBLANK or VBLANK interrupt, the 68000 figures 
this out by itself, using the above auto-vector table. (Hence 
the auto-vector term — it's automatic.) 

However, the MFP is a whole different breed. When 
the MFP asks for an interrupt, it tells the 68000 exactly 
where to go. The 68000 does not use the "auto-vector 
6" for the MFP's Level 6 interrupt as you would expect. 

The MFP is many things rolled into one chip. The in- 
tent of the MFP is to reduce chip count in a system by 
combining a bunch of needed functions all in one chip. 
There's a serial port for your modem, timers and — 
important to us here — an interrupt controller. 

The MFP can generate 16 different interrupts. Further- 
more, it will supply the 68000 with an address for those 
interrupts, skipping the whole auto-vector table above 
(even though it is a Level 6 interrupt). This is important 
because the 68000 doesn't have to spend time hunting 
around trying to find who interrupted it (polling). The 
MFP jumps the 68000 straight to the interrupt service 
routine. 

Just where the 68000 is sent is determined by what MFP 
interrupt happened. There's a table, starting at $100, that 
covers all 16 MFP interrupts. It tells the 68000 where to 
go to handle that particular interrupt. 

As you will see, most of the MFP interrupts start life 
unused. They are disabled, exactly as we turned off the 
6502's interrupts with IRQEN. (In fact, there are 16 bits 
in the interrupt mask registers of the 68901 IMRA and 
IMRB registers that are the mask bits.) However, they are 
there if you wish to use them: 

MFP INTERRUPT VECTOR TABLE 

$100 (initially disabled) — Parallel port interrupt handler 

$104 (initially disabled)— RS-2 3 2 carrier detect pin 
handler 

$108 (initially disabled)— RS-2 3 2 clear to send pin 
handler 

$10C (initially disabled) — Graphics blitter chip done in- 
terrupt handler (see below!) 



$110 (initially disabled)— MFP Timer D done handler 

$114— 200Hz System Clock (MFP Timer C) Handler 

$118 — Keyboard or MIDI interrupt handler 

$11C (initially disabled)— Floppy/hard disk data request 
handler 

$120 (initially disabled)— Horizontal blank counter: MFP 
Timer B 

$124— RS-232 transmit error handler 

$128— RS-232 transmit buffer empty handler 

$12C— RS-232 receive error handler 

$130— RS-232 receive buffer full handler 

$134 (initially disabled)— MFP timer A 

$138 (initially disabled)— RS-232 ring detect pin 

$13C (initially disabled)— Monochrome/color monitor 
change detecter 

<Hacker Note: The 68901 itself is told the base of the 
interrupt table in the VR register. You can change this if 
you wish. You need a copy of the 68901 documentation. 

PHANTOM BLITTER 

Interrupt Vector $10C is used by the Atari graphics "blit- 
ter" chip, which is to be a high-speed memory move chip 
very similar to what the Amiga uses. While not officially 
announced at this writing, Atari internal sources say the 
blitter chip is on the way, and Atari officials speak of it 
openly. It's clear from the documentation (BIOS) that sup- 
port for the chip is already built in. My guess is we'll see 
it on the extended ST due out eventually. 

Eight of the 16 MFP interrupts are from external sources, 
things like RS-232 connection pins. The other eight are 
generated internally, either timers which have counted 
down and need to be attended to, or the RS-232 port in- 
ternal to the MFP. 

The initially disabled vectors can be used for various 
things. For instance, if your modem generates a "ring 
detect" signal, you could hook this to the Atari ST, and 
have an interrupt occur whenever your phone rings. This 
could be a very good thing for a bulletin board system. 

If you look at these vectors with your debugger, you'll 
see that once again, most are pointed at the system bomb 
handler (the unused ones) and some are pointed at real 
handlers. Remember, what you see is the address of the 
handler routine, not executable instructions. 

Though all 68000 interrupts are classified as exceptions, 
not all exceptions are interrupts. Next month, we'll ex- 
pand our examination of 68000 exceptions and the ex- 
ception handlers. 
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It speaks for itself. 
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The 
Shanner 
Planner 



Remember the expression "A picture is worth a 
thousand words?" Take a second look. The Shanner 
Planner™ is the first ever full system portfolio created 
specifically for the computer user. Designed to 
address the individual needs of the computer in- 
dustry, The Shanner Planner is tastefully constructed 
of long lasting, durable, textured nylon (it's the 
in thing today) to maintain its smart appearance 
over time. 



The Shanner Planner™ 
gives you and comes with: 

• Storage for four disks -'5 x h" or 
5 l A" (specify preference 
when ordering) 

• 5 x 8" Notepad - can also 
accommodate documentation 
up to 300 pages 

• Pen and Pencil Compartment 

• Ruler Slot 

• Business Card Section 

• 5 Year Calendar 

• Full Function Memory 7 Calculator 

• Each Shanner Planner comes 
with either four 5W disks or 
four 5V4" diskettes 

The unique velcro locking system 
ensures that your important media 
and contents are safely secured in 
their compartments at all times. 

Measuring approximately the size of 
a normal executive portfolio, The 
Shanner Planner will fit comfortably 
into any size attache or carrying case, 
and comes packaged in an attractive 
gift giving box. 



$3995 



Dealer Inquiries Accepted 
Call 800/828-6637 



-Shanner Planner(s). 



Please send me 

I am enclosing $ . 

(CA residents add $2.60 tax per Planner) 
Please make check or money order 
payable to: 

Shanner International Corp. 
453 Ravendale Drive 
Mountain View, CA 94030 

Name 



Canadian Orders: 

Canadian cost per Planner is $49.95. 
(Ontario residents add $3.50 PST per 
Planner) Please direct orders to: 
Shanner Sales & Marketing, Inc. 
450 Garyray Drive 
Weston, Ontario 



Address 



SHANNER INTERNATIONAL CORP. 

The Shanner Planner" 1 is a creation of, marketed worldwide by, 
and is a Trademark of SHANNER INTERNATIONAL CORP. 



City 



State 



Zip 



For all orders: Please add $3.00 per Planner for shipping and handling. CCD 's and 
purchase orders will not be accepted. Please allow 21 days for delivery. 



New: Prospero's professional language 
compilers for the Atari 520ST 



PRO PASCAL & 
PRO FORTRAN-77 
FOR ATARI 520ST 



ISO-PASCAL 

Pro Pascal is validated to ANSI 770X3.97 
Class A (no errors) on the Z80 processor 
under CP/M and the 8088 processor under 
PC-DOS. This provides a guarantee 

that the compiler is complete 6$ 
and works perfectly. 



Ideal for 

- Atari software developers 

- schools and colleges 

- students of computing 

- development of personal skills 

- solving technical problems 

- training institutions 



( NO BUGS ) 
°HA<VE TO 
TfflrfblcgS 



FORTRAN! 77 

Pro Fortran-77 is a full implementation j 
J of ANSI Fortran 77 with no omissions Bp 
!■ and many useful extensions Q 

USE THE LANGUAGES 
THE PROFESSIONALS DO: 
PASCAL AND FORTRAN 



Produces compact 
efficient code ; 



Lazy I/O 

All files closed on| 
exit from procedure 



PASCAL ► FORTRAN 

INTERLINKABLE OBJECT CODE 



16 digit 

Single and double precision 
IEEE format arithmetic gives 
7 or 16 digit precision 



REVIEWS & INFCT 
r Call* 1-011-441-741 853 f 
for a free info pack with 
datasheets and magazine^ 
reviews! 




At Prospero we specialise 
in writing language compilers. 
We produce the best possible 
compilers, conforming to the 
appropriate standard, and giving I 
programmers a secure base on ; 
which to build. 



Compilers include: 
compiler, linker, 

run-time libraries, 
librarian, 
X-ref program, 

sample programs, 

200 page manual. 



Atari specialists & 
distributors : contact us for 
distributor terms 




*Call early! 

Before 1pm East coast, 
10am West coast 



Prospero Software Ltd 

190^astelnau, London SW13 9DH 
England. Telephone 01-741 8531. 
Telex 8814396 PROSOF G. 



BIG 

Compiles big programs 
> 10000 lines... 
>1000 identifiers... 
Separate compilation 
to build libraries and 
massive program suites 



Used at 5000 sites 
around the world 



"Pro Pascal is not only ISO-validated, 
it is also a superb-quality and very 
full software development tool." 
Personal Computer World Nov 1985 



It's easy to order! 

Credit card holders phone 1-01 1-441-741-8531* 
Mastercharge, Visa, Diners & Amex taken. 



O 



Send this coupon with cheque to Prospero Software, 
190 Castelnau, London SW13 9DH, England. 
Add $5 shipping. Allow 28 days for delivery. 

Please supply copies Pro Fortran-77 at $149. 

Please supply copies Pro Pascal at$149. 

Special offer: both compilers for $269. 

(Atari 520ST) I enclose payment for $ . 

Name 

Address 

Telephone no 



In case of query call 1-011-441-741 8531* 
or telex 8814396 




First IT BASIC applicatiorv 



by STEVE WHITNEY 



When ST BASIC finally became avail- 
able, I was determined to write a pro- 
gram that would demonstrate its real 
power. Several "biorhythm" programs 
had been floating around the public 
domain. "Why not?" I thought. 

BIO BACKGROUND 

So, what are biorhythms? Good ques- 
tion. Biorhythms chart certain alleged 
biological rhythms (hence the name) 
which begin at birth and continue 
through life. There are Physical, In- 
tellectual and Emotional rhythms. 

These rhythms are simply, in es- 
sence, plotted sine waves (see Artis- 
tic Mathematics in this issue). When 
one of your biorhythms is at its 
highest point on the curve, your abil- 
ity to deal with that area of your life 
is likely to be high. When a biorhythm 
is low, your ability may be dulled. But 
on days when a particular biorhythm 
is crossing the center axis (horizontal 
midline), it may be considered a crit- 
ical time in your biorhythm. When 
more than one of the biorhythms 
cross that horizontal center line at the 
same time, it is considered to be a 
double or triple critical day. (Stay in 
bed!) 



You might try keeping a record of 
how you feel on certain days and 
then, later, compare your observa- 
tions with the biorhythm and deter- 
mine their validity. I have tried this 
and found it to be quite accurate 
sometimes — but quite far off on other 
occasions. (We would like to add that 
many consider biorhythm analysis to 
fall into the same category as astrol- 
ogy.-^ RESOURCE) 

BIO TYPE-IN 

ST Biorhythms will run on any Atari 
ST regardless of resolution. Boot your 
ST and activate ST BASIC. If you have 
a lot of desk accessories or a large 
background program in memory, ST 
Biorhythms may not load. To over- 
come this, use your mouse to de-select 
Buffer Graphics from the Run Menu 
of ST BASIC. This will give you an ad- 
ditional 32K of memory. Type in List- 
ing 1, BIORTHM.BAS, and SAVE a 
copy to your disk before you RUN it. 

The program will full and clear the 
output window, then ask for your 
birthdate, name, and the month for 
which you wish the biorhythms plot- 
ted. When these are answered, the 
program will ask if you want the chart 



sent to the [P]rinter or the [Sjcreen. 
Choose [P] or [S] and the biorhythm 
begins printing out. When the chart 
is finished, press [Help] or [Esc] to end 
the program. 

BIO LOGICAL 

Let's examine Listing 1. You might 
have already noticed there are no 
gotos in this program. ST BASIC has 
features that make writing a goto-less 
program easy. Starting from the top, 
line numbers 1000-1050 are the pro- 
gram title. Lines 1070 to 1130 com- 
prise the entire work loop in this pro- 
gram. And this loop does exactly what 
it says: while not finished, gosub 
BIORHYTHM. Eventually the pro- 
gram will be finished, and the pro- 
gram will end. 

COUNTDAYS will count the num- 
ber of days between birthtime and 
printtime. At one time or another it 
will call one of the four self- 
explanatory subroutines located be- 
low it, between lines 1270 and 1520. 

Next, the main routine BI- 
ORHYTHM starts at line 1540. This 
routine will clear and full the output 
window, place the title along the top 
and gather in the desired birthdate, 
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name, and month of printout. Limited 
range-checking is done on the infor- 
mation typed in, and the program 
proceeds to COUNTDAYS (line 
1930), which counts the number of 
days between the birth date and the 
start of the displayable month. 

Next, the program stops and asks 
for the desired output device. Select 
either [S]creen or [P]rinter (upper or 
lower case are both okay) and con- 
tinue. Between lines 2060 and 2070, 
control is diverted to whichever out- 
put routine you choose. 

Line 2110 is where the screen out- 
put subroutine ONSCREEN is lo- 
cated. It first clears the output win- 
dow, then the subroutine FANCY will 
draw the displayed box and fill the 
background with a pattern. LABEL 
will print the labeling on the graph. 
Next, print the title along the top of 
the screen. Next, we have a nested 



for. . . next loop that will plot each 
of the cycles onscreen. Below that, 
perform a vdisys() call to set the 
linewidth to 1 pixel wide, then stop 
in a loop— GETKEY— waiting for a 
keystroke. 

The subroutine HELP prints a keys- 
troke reminder onscreen. ON- 
PRINTER is the routine that prints 
out the biorhythm chart onto paper. 
This routine as written will work on 
any Epson, Star Micronics, or Epson 
compatible printer, (such as an ADS- 
2000). It performs an ASCII dump, 
and as such does not require your 
printer to handle graphics. 

CALC and FINDR are small 
number-crunching subroutines that 
are called from above in the output 
routines. LABEL and FANCY are 
described above, where they are 
called from. 

INITIALIZE performs the initiali- 



zation needed to run in any resolu- 
tion. It determines the current reso- 
lution, initializes constants, and fills 
arrays with needed start-up informa- 
tion. Finally, INITLOREZ, INIT- 
MEDREZ, and INITHIREZ contain 
resolution-specific information. 

BIO WRAP-UP 

Can you see the power of Atari ST 
BASIC? C'mon, all you ST BASIC Pro- 
grammers out there! Let's show the 
world what the ST can do. . . 
BASICally. 

Steve Whitney is a freshman at Stan- 
ford University, trying to decide 
whether to major in electrical engi- 
neering or computer science. His 
parents bought him an Atari 800 in 
1982 and it all went from there. 
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ProCopy 

INTRODUCTORY OFFER 



$24 95 $TS P 

Regular $34.95 Offer ends July 31, 1986 
Software can easily be damaged by heat, humidi- 
ty, magnetic fields, wear & tear or just dirt. The ex- 
posed surface of a disk can be affected by even a 
touch. The best way to preserve your software is to 
make backups. ProCopy provides the solution. 

■ Duplicates virtually any disk. 

■ Reasonable update policy available. 

■ Protects against accidental loss of 
expensive software. 

■ Not copy-protected for your convenience, 

■ ProCopy works on all Atari ST computers. 

ORDER TODAY AT THIS REDUCED RATE 

Send $24.95 (check or money order). VISA 
& MC accepted. Add S2.00 shipping 8c 
handling in U.S. & Canada. Overseas ship- 
ping & handling add $4.50. 



Atari ST is a registered trademark of Atari Corp. 



Available Only From 

PROCO PRODUCTS 

P.O. BOX 665 
CHEPACHET, RHODE ISLAND 02814 USA 
(401) 568-8459 



DeskMaster 

A Complete Set of Desk Accessories For The 



ATARI ST 



TM 



CALCULATOR • CARD FILER • NOTE PAD 

Memory Resident Desk 
Accessories. Can be ac- 
cessed while using most 
GEM™ application pro- 
grams. Accessories use 
their own windows and ap- 
pear above running appli- 
cations. 

CALCULATOR — A pow- 
erful 6-function calculator 
containing square root 
and percentage keys. 
Simply point and click on 
buttons with mouse. Great 
for spreadsheets, business 




applications, or whenever a quick calculation is needed. 
CARD FILER — Store names, addresses and telephone numbers in 
this mini, yet powerful, database. Retrieve records in seconds with op- 
tional index search. 

NOTE PAD — Versatile notepad and text editor. Stores eight pages per 
file. Great for appointment scheduling, reminders, etc. Store applica- 
tion instructions for convenient recall. Merge files with word processors. 

$44.95 
StaiTroniks 

Dept. A-1, P.O. Box 8185, Turnersville, NJ 08012 

SHIPPING: Add $3.50 for shipping and handling. New York residents add appropriate sales 
tax. Canadian residents add $6.00. Foreign residents add $10.00. 

TERMS: Enclose personal check, cashier check or money order. No CCD's. Only U.S. cur- 
rency will be accepted. Most orders shipped within 48 hours. 
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ZOOMRACK: 

Database with 
"time-card" metaphor 



by JOHN KOSIOREK 



Zoomracks is an untraditional, text-oriented database. 
The name is derived from the information format that 
simulates cards stored in racks. The user can "zoom" in 
and out of details contained on the cards. 

The rack emulation provides a visual approach to data 
manipulation that helps in learning to use the database. 
The documentation says the metaphor for this product 
is similar to a rack of employee time-cards. You take a card 
out of the rack (zoom in) to examine or change its details. 
Then you can put it back in the rack (zoom out) or copy 
it to another rack. 

If you have an application that requires storing infor- 
mation on various-sized cards, Zoomracks can provide a 
method to control and organize it. Since Zoomracks has 
no numerical functions, it follows that there are no mathe- 
matical capabilities available for report processing. Instead, 
Zoomracks emphasizes flexible data manipulation and 
control. 

The various elements of Zoomracks are not exactly the 
same as those in more traditional databases, so the names 
are somewhat different. Fields, the smallest blocks of de- 
fined data, are called "fieldscrolls". The reason for the dif- 
ferent name is that fieldscrolls do not have a defined 
length. Any field may be up to 80 columns wide and up 
to 250 lines long. 

There can be 27 fieldscrolls to a "quickcard," which 
is analogous to a record. Quickcards are grouped into 
"zoomracks" which are similar to files. Nine zoomracks 
may be in memory simultaneously, and up to nine files 
may be displayed on the screen. By allowing records on 
the screen from various files, merging and comparing data 
between zoomracks can be easily accomplished. 



Another way to look at this system design approach is 
to consider the file directory as a rack of Zoomracks files. 
A Zoomracks file is a rack of quickcards. A quickcard is 
a rack of fieldscrolls and a fieldscroll is a rack of text. This 
is how Zoomracks achieves much of it flexibility. 

TYPCIAL SEQUENCE 

A typical sequence for viewing specific data might start 
by finding the file in the directory rack, then loading the 
file into another rack. This is followed by finding the rec- 
ord or quickcard in the file and displaying that card on 
the screen. This will show the first line of all the field- 
scrolls for the quickcard. And each fieldscroll viewed can 
be expanded to a maximum of 250 lines. 

Zoomracks also features user-definable 2-key macros 
for performing repetitive tasks or for entering repetitive 
data strings. The database is RAM-based so the total num- 
ber of records or files accessible at any time by the system 
is dictated by the amount of available RAM. When Zoom- 
racks is loaded into a 520ST with TOS in RAM and no 
desk accessories, there are 56,000 bytes for data files. A 
"gas gauge" at the bottom of the screen graphically shows 
RAM usage. Menu options are always present on the 
screen. 

The documentation consists of a 128-page instruction 
manual, with a table of contents but no index. It takes 
a step-by-step approach to presenting the features of this 
software and is designed for both the ST and IBM ver- 
sions of Zoomracks. The main difference between the ST 
and IBM versions appears to be in the keyboard and in 
the Atari's use of the mouse device — though no GEM 
graphics are utilized here. 
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An online tutorial and a few demos are provided, along 
with sample data files. There is also an online Help func- 
tion that provides additional information about your cur- 
rent system location. The demos are interesting and pro- 
vide a view of many of the system's features, but they 
cannot be implemented in your own files without first 
reading and understanding the instruction manual. 

The tutorial is informative and gives a feeling of the 
flavor of the program, but learning by doing seems to be 
the best approach with this package. An undo command 
is present for most features— although the Atari's handy 
[UNDO] key is used only during text editing. 

Other keyboard choices act as toggle switches where 
the same key again reverses the previous action. Moving 
through the racks, cards and fields can be accomplished 
by several methods — keystrokes, function keys, macros, 
or the mouse. Fieldscrolls can be added, modified, moved, 
or deleted. This allows for reformatting an entire file 
quickly and easily. As a matter of fact, fieldscrolls and 
quickcards can be moved between zoomracks just as easily. 

MANY CHOICES 

In a typical Zoomrack session, once the directory rack 
is loaded, the program searches for a rack called 
MACAUTO and, if found, it is loaded. The menu choices 
appear at the bottom of the screen just above the mem- 
ory gas gauge. But they are only there as a visual reminder 
of specific modes of operation that can be chosen. You 
are not limited to them. Processing choices can be made 
by using the appropriate key, macro, function key, mouse 
or by pressing the [RETURN] key to select the menu choice 
currently displayed in inverse text. 

Compared to other databases, it is easy to reformat a 
quickcard and add or delete fields. Files may be sorted 
or searched on any field. A major limitation is that only 
one sort field or search string at a time is allowed. There 
is a cut-and-paste feature that allows quickcards, field- 
scrolls, or partial fieldscrolls to be cut into a buffer and 
pasted into another location. Text within a fieldscroll may 
be formatted by use of the field editing features — a small 
text processor that can handle about three pages of cor- 
respondence per fieldscroll. 

Printing controls provide for one or all quickcards to 
be printed. Ranges can be printed by moving the desired 
range of records to a temporary rack. While this may seem 
like a tedious task it is actually not difficult to do. Labels 
may be printed in the same manner by resetting the height 
and width of the display screen, which changes the height 
and width of the area to be printed. In keeping with the 
visual interface, this method allows the user to see what 
will print ahead of time. Files may be loaded or saved in 
Zoomracks format, or in ASCII format for sharing data 
with other programs. Further processing of the ASCII files 
will probably be required to get the data in a format an- 
other program could use. 

Zoomracks could be used for any list application that 
does not require the math abilities of other databases. All 
fields are considered to contain text data. Mailing lists, ap- 
pointments, any type of notes, or a client list are applica- 



tions that instantly come to mind. A field can be three 
pages long, and racks can be merged and printed. There- 
fore, form letters in one rack can be individualized with 
the names and addresses from another rack and then 
printed. 

EASY INTERFACE 

The Zoomracks user interface is well thought-out, provid- 
ing visual clues for most of the processing options. But, 
as in any system where complex actions are possible, learn- 
ing the many uses of Zoomracks is a time-consuming proc- 
ess. My only problem occurred when writing to a full disk 
during the rewrite. No message appeared on the screen, 
but records were lost and the last record written to disk 
was incomplete. The file could be loaded, but trying to 
process the last record crashed the system. By using the 
quickcard copy feature and the macros, I saved valid 
records to another file. 

The most confusing part of learning and using this sys- 
tem is that there are often several ways to make the same 
processing choice. The user is faced with choosing be- 
tween using keystrokes, or a function key, or a macro, or 
pressing [RETURN] to process the current menu option — 
or pointing and clicking with the mouse. While this pro- 
vides a high degree of flexibility to the experienced user, 
it makes learning the system more difficult. 

When files are loaded to a rack, the files already in mem- 
ory may be moved to another rack. This means you'll have 
to search through several racks to find a file. A helpful func- 
tion here would be a directory of files in memory along 
with the directory of files available on disk. The program 
could be made much stronger by the addition of mathe- 
matical and numerical functions along with the report- 
ing methods that numerical fields require. 

The 520ST has a friendly [HELP] key and Zoomracks 
provides online help screens specific to the current 
processing function, but the [F4] key is used to toggle the 
help function on and off. I assume this is for the sake of 
compatibility between the ST and the IBM keyboard 
which lacks a [HELP] key. 

Zoomracks is not copy-protected. Quickview Systems 
say they plan to constantly improve and upgrade this prod- 
uct and they welcome user input. Also, Quickview plans 
to provide upgrades at a nominal charge to current users. 

If your applications require mathematical capabilities, 
you will not find a use for this database program. But if 
manipulating and organizing text can solve your 
problem — and you are interested in a new visual perspec- 
tive on database processing — Zoomracks could be just 
what you are looking for. 



ZOOMRACKS 
Quickview Systems 
146 Main Street 
Los Altos, CA 94022 
(415) 965-0327 

$79.95 H 
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ATARI DISK DRIVE OWNERS . . . 
HAPPY BLASTS RETAIL PRICE— ORDER TOLL FREE! 




THE FAMOUS HAPPY ENHANCEMENT NOW ONLY $149.95 
for 1050 order number HO A, for 810 order number HC8A 

Makes your disk drive read and write faster, and allows you to execute the HAPPY WARP SPEED SOFTWARE. 
Available only for ATAR1 1 050 and 81 0 disk drives. 1 050 version allows true double density plus the original single 
and enhanced density. PRICE INCLUDES WARP SPEED SOFTWARE BELOW, installation required. 

HAPPY WARP SPEED SOFTWARE REV 7 (not sold separately) 

Includes the famous HAPPY BACKUP and COMPACTOR which are the most powerful disk backup utilities 
available for your ATARI computer, plus MULTI DRIVE which allows high speed simultaneous reading and writing 
with up to 4 HAPPY ENHANCED drives, plus SECTOR COPIER which is the fastest disk copier that supports the 
130XE RAMDISK, plus the WARP SPEED DOS which improves ATARI DOS 2.0s to allow fastest speed, plus 
HAPPY'S DIAGNOSTIC which allows comprehensive disk drive testing. 

HAPPY 1050 CONTROLLER $64.95 order number HC2A 

For use with HAPPY ENHANCED 1050 disk drives only. Allows easy access to HAPPY 1050 slow and fast speeds 
and ultimate control of disk drive write protect, including writing to disk back side and protecting valuable data 
disks. Printed circuit board has switches and write protect indicator LED, installation required. 

GET YOUR FAVORITE HIGH SPEED DOUBLE DENSITY DOS 

Both of these disk operating systems support the fastest speed with both HAPPY 810* and 1050, and with HAPPY 
1050 you get true double density. WARP SPEED DOS XL is HAPPY's own version of OSS DOS XL, and includes, 
under cartridge, under ROM and AXLON RAM disk version, and is order number HC4A at $29.95. TOP DOS 
version 1 .5 from ECLIPSE SOFTWARE has more menu driven features, operates in all three densities, supports the 
130XE RAMDISK, and is order number HC6A at $39.95. *Note: 810 requires upgrade below. 

810 VERSION 7 UPGRADE $49.95 order number HU3A -XXXX 

Allows older 81 0 HAPPIES to use newer software. Includes custom plug in IC and rev 7 WARP SPEED SOFTWARE. 
Same price for all HAPPY 810s registered or not. When ordering replace XXXX in part number with the serial 
number of your HAPPY COMPUTERS manufactured 81 0 board, or with a 2732 or 2532 which corresponds to the 
EPROM part number in your HAPPY 810 socket A1 02 of your side board modified HAPPY (not made by HAPPY 
COMPUTERS), installation required. Upgrade not needed for new 810 HAPPY'S and serial number over 8000. 

SUPER PACKAGE SPECIALS 

Get a HAPPY 1050 ENHANCEMENT and CONTROLLER and WARP SPEED DOS XL for just $199.95 order 
number HS5A, or get the same with TOP DOS 1 .5 instead of DOS XL for just $21 4.95 order number HS7A. If you 
already have the 1 050 ENHANCEMENT you can get the HAPPY 1 050 CONTROLLER and WARP SPEED DOS XL 
for $74.95 order number HXL9A, or get the HAPPY 1 050 CONTROLLER and TOP DOS 1 .5 for just $84.95 order 
number HTD9A. For other specials and dealer pricing call (408) 779-3830. 

All prices include UPS shipping in USA, add $1 0.00 for shipment outside USA. California residents add sales tax. No extra charge for credit cards or COD, VISA or 
MASTERCARD accepted. Our toll free number is an order taking service, not our line. To ORDER ONLY call (800) 538-81 57 outside California, or (800) 672-3470 
inside California, ask for extension 81 7 and have your credit card, part number and quantities ready. Toll free hours 6 am to 1 2 pm Mon.-Fri., 8 am to 8 pm Sat. & 
Sun., Pacific Time. For answers to questions call HAPPY COMPUTERS at our number below. Office hours 9-5 Mon.-Fri. Pacific Time. 

HAPPY COMPUTERS, INC. * P.O. Box 1268 * Morgan Hill, CA 95037 * (408) 779-3830 
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IELP SCREEN 



KG ADDITIONAL HARDWARE REQUIRED! 

Works with monitor or TV 
80 column screen display 

ri iliici Lt'uc^ I an Dc iioci iru 

Features: 

* full editing 

* block Have 

* centering 

* search and replace 
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HI-RES GRAPHICS SERIES 
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ARTIST UNLEASHED 



Use a joystick or Koala pad to draw or 
write text on graphics 8 screen. 

Features: 

* Enlarge/reduce * Hove/copy 

* Merge * Rotate * Reverse * Invert 

* Inverse Video * Erase * Over draw 

* Save any section of screen * Refine 

* Print in 3 sizes # Use 3 colors 

* Fill * Draw circles * Change colors 

Includes; 



2 Character generaters 

REGULAR - create your own regular 

size character sets. GQNPUTEB 5&*LQt 

DOUBLE - create double size sets. 

"nts S mmm solid 

Patterns: IS W. Wk M. 



CONVERTERS 



Convert COMPUTER EYES files 

Convert PRINT SHOP SCREEN MAGIC files 



ORIGINAL REVER5E INVERSE 




CL REDUCED RQTflTE ,„< 



OVER DRA 




Create your own character sets for the 
word processor and the Epson printer. 



ATARI MR ITER 
CONVERTER 



I Convert both ways with WRITE 88 




MAKE CHANGES 0 RETURN TO TEXT 
GO TO MAIN MENU?! 



CARD 



Create your own 4 page 
greeting cards using 
any combination of text 
and graphics. Program 
has Many of the editing 
features contained in 
Artist Unleashed. Use 
any files created with 
Artist Unleashed. 





LAYOUT 



Combine 2.3 or 4 column panel sets 
and headings using any combination 
of text and graphics to create news 
pages, posters, leaflets, letterheads, 
etc. 



NOTE: This entire ad was Made I'd 
using LAYOUT! ! W 



DATA DISKS 



Additional font sets, graphic files, 
icon sets and border sets will be 
available to be used with ALL the 
programs in the Hi-Res Series. 



WRITE 80 55.95 

PRINT PLUS 25.95 

ARTIST UNLEASHED 49.95 

CARD 24.95 

LAYOUT 39.95 

CONVERTERS 9.95 

* converters will be $4.95 
with the Main program 

* All graphics programs are 
presently for Epson or 
Epson coMpatable printers 



DEALER INQUIRIES INVITED 



Call or write for additional 
information, 

For direct orders enclose the 
awunt plus $3 for shipping. 
Specify UPS or first class 
Mail delivery. 
IV State residents add 57. 
sales tax, 



MTS Software 
P.O. Box 623 
Willi ansvi lie 

Order 1 me : 

7JL6 — 634 



NY JL-422JL 



VISA or* 



0578 

MA STER CHARGE accepted 



ATARI is a registered trademark of 
Atari, Corp. All Rights Reserved 
Epson is a registered trademark of 
Epson America Inc. 

The MTS Software logo and all software 
titles are trademarks of MTS Software 



COMING SOON* 

3D - 3 dimensional 
drawing system 

ANIMATION 
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by CHRISTOPHER CHABRIS 

1st Word 

ST users starved for applications soft- 
ware that's designed to use the 
friendly visual interface of the GEM 
desktop glimpsed a light at the end 
of the tunnel last December. With its 
own GEM write package not yet ready 
for release, Atari Corp. began includ- 
ing lst-Word with each complete 
520ST system sold. lst-Word, by Brit- 
ish software developer GST Holdings 
Ltd., is a capable word processor with 
basic editing, formatting, and print- 
ing factilities that should satisfy most 
ST users. And it's Free. At this writ- 
ing, Atari planned to continue pack- 
ing lst-Word with every 520ST. 

A GEM application's visual appear- 
ance is essential to its convenient and 
productive use. lst-Word performs ad- 
mirably in this category. Its drop- 
down menus are well thought-out, its 
windows are well designed and 
placed, and it works flawlessly with 
the standard desk accessories. After 
double-clicking on its icon to run lst- 
Word from the desktop, you are 
presented with the menu bar, a strip 
of function key icons, a font table, and 
the standard GEM Item Selector dia- 
log box. Select a file to edit and a win- 
dow zooms open to display its 
contents. 



lst-Word is a What-You-See-Is-What- 
You-Get word processor. Each docu- 
ment window displays your text cen- 
tered, justified, boldfaced, italicized, 
underlined — you get the idea. Al- 
though top and bottom margins and 
headers and footers are not displayed, 
print preview screens and test prin- 
touts are virtually unnecessary. Unfor- 
tunately, underlining gets wiped out 
when you start typing on the next 
line, and superscripts and subscripts 
appear as normal characters. 

To speed the editing process, lst- 
Word does not reformat and restyle 
your text as you type. Instead, after 
modifying a paragraph, you must 
choose a menu command to force a 
new display showing your changes. 
I was annoyed by this at first, but 
quickly got used to it. The time saved 
really does make up for a temporary 
visual mess.You may have up to four 
document windows open at once, 
and you can switch back and forth be- 
tween them by clicking the mouse 
anywhere on the next document you 
want to use. Windows implement all 
the customary GEM operations, in- 
cluding moving, sizing, zooming, 
horizontal and vertical scrolling, and 
closing. A ruler line under the title bar 



displays tab and margin settings. If you 
change them (with the mouse) the 
new settings apply to text typed after 
the changes. Previously entered text 
remains the same. 

CUT, PASTE, SEARCH 

lst-Word maintains a single cut-and- 
paste buffer so that text can easily be 
transferred between documents. Sim- 
ply select the text you wish to cut (or 
make a copy of) by either surround- 
ing it with a rectangle or marking its 
beginning and end, choose Cut block 
(or Copy block) from the Block menu, 
position the cursor wherever you 
want the text to reappear, and choose 
"Paste block" from the Block menu. 
Presto! Additionally, blocks of text can 
be deleted, moved, written out to disk 
files, and read directly from disk files 
into documents (sort of a "Paste file" 
function). 

Search-and-Replace capabilities are 
standard, allowing forward and back- 
ward search and matching of upper 
and lower case. Strangely, if you keep 
typing beyond the edge of the dialog 
box when entering the string to search 
for, the line cursor moves off into the 
text but the characters you type don't 

continued on next page 
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appear on the screen. If this is inten- 
tional, I'm glad the program doesn't 
crash. There must be a better way to 
handle this.lst-Word also has several 
unusual editing features. Word wrap 
can be turned on and off. Four sepa- 
rate "marks" can be set anywhere in 
the text so that the cursor can move 
there via a single menu selection. Us- 
ing the GEM Item Selector, you can 
delete files from your disks without 
returning to the desktop. 

ASCII EDITOR 

The program can also be made to 
function as an editor for simple ASCII 
text files, with no style or format in- 
formation saved to disk. This mode 
would be useful for telecommunica- 
tions buffs who compose messages 
for uploading and must have plain 
text output. Programmers will find 
this mode excellent for writing source 
code. 

The current page number is dis- 
played in the left window margin. 
Each function key (F1-F10) can be ac- 
tivated by clicking on its icon in a strip 
that appears at the bottom of the 
screen. It is possible to enter any print- 
able character in the ST character set 
by clicking on it in a 16 x 16 table that 
displays each and every one, includ- 
ing the Fuji symbol and the various 
GEM icons. Unfortunately, you can- 
not use the search and replace func- 
tion on words created with special 
characters. (Note that these last three 
visual features only appear in medium 
and high resolution displays.) 

Document formatting is controlled 
from the Layout dialog box sum- 
moned from the File menu. Here you 
are invited to specify the top and bot- 



tom margins, total page length and 
header/footer text. Although headers 
and footers can each be only one line 
long, each can have a left, center and 
right-justified component plus an 
embedded page number. Page num- 
bers must appear on every page. In- 
terestingly, verso/recto printing is 
supported — your pages can be left or 
right oriented. The user can create 
conditional and normal page breaks 
by dragging the mouse in the left win- 
dow margin. 

It is good that all of lst-Word's for- 
matting features work flawlessly, since 
there are so few of them. More flexi- 
bility is needed because people will 
find more uses for the program than 
reports and business letters. I would 
consider double-spacing, multi-line 
header and footer text, date and time 
insertion, and perhaps even footnot- 
ing, essential capabilities in the next 
release of the software. 

New users may not need all this, 
though, and it seems that lst-Word 
was designed with them in mind. A 
long Help menu offers brief reminders 
on key topics, as well as an Extra Help 
option that automatically inserts a di- 
alog box reminder between all menu 
selections and their execution. I'm 
not sure that even first-time computer 
users won't outgrow this within five 
minutes, but its always there if you feel 
insecure. It's too bad that neither the 
[HELP] or [UNDO] keys are used, 
since both have obvious uses in word 
processing. 

As shipped, lst-Word includes 
drivers for Epson dot-matrix and 
Qume Sprint daisywheel printers, as 
well as a generic ASCII-only driver 
that ignores all special character 



styles. Near letter-quality print mode 
is supported for printers that have it. 
A special program is used to install the 
driver of your choice so that lst-Word 
will use it when you select the Print 
command. (For some reason, docu- 
ments can only be printed after all 
windows are closed.) Drivers for 
several other printers have been 
posted to SIG * Atari on CompuServe, 
so check there before writing your 
own. 

The documentation for lst-Word is 
stored on the program disk. A short 
note provided clear instructions so 
that beginners would have no prob- 
lem printing out a copy. Future ver- 
sions may include a typeset manual — 
but this costs money. Printed out, the 
manual is 42 pages long with no in- 
dex. It is concise, consistently or- 
ganized, and very well written for 
both beginners and experienced 
users. A tutorial text file is also in- 
cluded on the disk. 

ROBUST ENTRY 

I have very few criticisms of lst-Word. 
Like all other ST word processors I 
have seen, it does not offer Macintosh- 
style multiple type fonts. It also has 
idiosyncracies and minor bugs. But as 
an entry-level GEM word processor it 
is much more than I expected when 
I got it. Its best feature is an outstand- 
ing robustness — it has yet to crash and 
dump me into a desktop full of 
bombs. I only wish lst-Word had been 
available last summer! 
1ST-WORD 
Atari Corp. 

1196 Borregas Avenue 
Sunnyvale, CA 94086 
(408) 745-2000 



D8 Master Or\e 



The long-awaited ST version of Stone- 
ware's DB Master One, a popular 
database manager for the Apple II and 
Macintosh, finally arrived in Decem- 
ber. I assumed that since Atari was giv- 
ing it away with each complete 520ST 
system purchased before Christmas, 
it couldn't be worth selling. I was 
wrong. DB Master One is an excellent 
GEM-based program that should be 



able to handle most users' file- 
management needs. 

The DB Master One package in- 
cludes a disk containing the two pro- 
grams MAKEONE and USEONE, a 43- 
page indexed manual and a product 
registration reply card addressed to 
Stoneware. Apparently, Atari is han- 
dling the distribution and marketing 
of DB Master One while Stoneware 



develops and supports it. Indeed, 
shortly after registering the program, 
I received from Stoneware an ''order 
form" for technical support. For $25, 
users can purchase 30 minutes of tele- 
phone consultation. This is a policy 
that I strongly oppose. Why should 
users of a low-end productivity pack- 
age have to pay extra for the support 
they deserve and receive free of 
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charge from companies like Op- 
timized Systems Software? 

(We asked Stoneware about this. 
They told us that customer support 
has become the single most expensive 
area of software marketing. In order 
to keep the cost of a product like DB 
Master One down, they believed they 
had to establish a support service 
charge. Stoneware also felt most 
users would have little need for cus- 
tomer support on DB Master One. 
But if they had tacked the customer 
support charge onto the product's 
price tag people who didn't need the 
support would be paying for those 
who did.-Sl RESOURCE) 

DB Master One is extremely intui- 
tive. This is primarily an entry-level 
database, but a very flexible one. Even 
new users should be able to start us- 
ing this program productively right 
away. Making extensive use of the 
GEM user interface and help menus, 
DB Master One is easy to use in itself. 
But the concise, well-written, and 
helpfully illustrated user's manual is 
always there if you run into trouble. 
It includes complete descriptions of 
each drop-down menu and dialog 
box used by the programs. An unusual 
but welcome feature is "Understand- 
ing File Management," an introduc- 
tory chapter for new users. 

TWO MODULES 

Several features are common to both 
modules of DB Master One. All desk 
accessories are available from within 
the programs, many menu selections 
have keyboard equivalents, and help 
requests at the bottom of each menu 
call up dialog boxes that explain the 
commands. 

To create a new file, run the 
MAKEONE program, which presents 
an empty window where you can 
place fields and labels. Simply click 
the mouse where you want a field to 
begin and drag to where you want it 
to end. Each field is a rectangle that 
you fill with information. A field can 
be either label-only (a title, for exam- 
ple), data-only, or most commonly, 
labelled data. As you play around with 
a field's shape, its size in characters is 
displayed in a corner. Various colors 
and styles can be combined to create 



more pleasing visual effects. 

If you have already designed a form 
and created a file with it, you can use 
MAKEONE to edit the design by ad- 
ding, removing, re-sizing, and rear- 
ranging the fields. When you are 
done, simply click on SAVE to record 
the changes. 

You will run MAKEONE relatively 
rarely compared to USEONE, which 
performs all the file management 
functions aside from creating and 
modifying forms. You can add, delete 
and edit records easily by just click- 
ing on the desired fields and typing 
in some text. In USEONE you can also 
find and examine selected records, 
sort files and print reports. 

To get a better idea of just how easy 
it is to use DB Master One, let's walk 
through a sample session. Suppose we 
want to create a simple mailing list. 

SAMPLE SESSION 

First, as advised by the manual, we'll 
think out our planned database and 
record a few notes on paper before 
even turning on the computer. I found 
it just as easy to do this within the pro- 
gram since DB Master One makes it 
so simple to play with form layouts. 
It's easy to place name, street address, 
city and other fields in the desired lo- 
cation on the screen. 

But it is even easier to take advan- 
tage of the "Splat" menu. This is an- 
other unique feature that provides 
several predesigned field layouts (not 
complete forms) for common filing 
applications such as checkbooks and 
mailing lists. Just click and the proper 
fields are splattered onto the form all 
at once. If we want, we can now alter 
the color, size, and style of labels and 
fields. 

We're done creating the form, so 
we save it to disk and quit to the desk- 
top. Now we run USEONE and begin 
entering data. 

Each record is filled by typing in- 
formation into the fields. You can ei- 
ther fill them in order, pressing [RE- 
TURN] to move to the next, or 
randomly by clicking on fields as their 
contents come to mind. After each 
form is completed, selecting Add Rec- 
ord from the menu bar, or pressing 
[Control] [A], adds the information to 



the file and presents a clean form for 
the next record. When we've thought 
of all the people we want to put on 
our mailing list for now, we can save 
the file to disk for later use. 

Now we could modify the form by 
using MAKEONE again, or run 
USEONE to print out address lists, 
mailing labels, and other reports. DB 
Master One uses icons to facilitate the 
creation of up to 10 reports from four 
basic formats. Reports can also be 
saved to disk for later use and can be 
output to either the screen, the 
printer, or a disk file. 

THE SPECS 

For experienced database users, the 
statistics on DB Master One are: max- 
imum file size— 320000 characters; 
maximum number of fields — 100 per 
form; maximum field size— 3000 
characters; maximum record size — 
3000 characters. It seems that the en- 
tire file is kept in RAM when running 
USEONE. Consequently, sorting oper- 
ations are fast. A 1,000-record mail- 
ing list sorted on the last-name field 
can be re-indexed on the ZIP code 
field in just a few seconds! Sorts and 
searches operate on as many as three 
fields. 

DB Master One is without a doubt 
the easiest and most enjoyable file 
management program I have ever 
used. The manual cover even calls it 
the "easy filing system for the Atari 
ST," implying plans for more power- 
ful versions in the future. (Stoneware 
has indeed told us of plans for up- 
grade modules; some of which may 
be available by the time you read 
this. -ST RESOURCE) 

There are a few drawbacks to the 
program. The manual, while excellent 
in explaining data management and 
the operation of the program, con- 
tains no technical information. I 
would have liked to see a description 
of the program's file formats. The pro- 
gram itself could use customizable 
printer drivers, capability to work on 
more than one file at once, and a way 
to import data stored in other com- 
mon formats. But DB Master One's 
RAM-based nature and lack of such 
tools as a programming language and 

continued on next pase 
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continued from page 85 

natural-language query system do not 
hurt the program and its purpose, 
since they really belong in a higher- 
end product aimed at more ex- 
perienced users. 

In sum, DB Master One should help 
Atari sell the ST. Prospective users 
should not be deterred by Stoneware's 
support policies, because the program 
is truly easy to use. DB Master One is 
a real winner for individuals and busi- 
nesses that need an easy but power- 
ful file manager. 



DB MASTER ONE 
Atari Corp. 

1196 Borregas Avenue 
Sunnyvale, CA 94086 
(408) 745-2000 
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Manipulate ar\u fl disk file 



by PATRICK BASS, Antic ST Program Editor 



Hold an ST disk in one hand and slide 
the metal shutter open so you can see 
the disk inside. Look at it very closely. 
Can you see the tiny letters and num- 
bers stored on the disk? Of course not. 
But they are there, and this month I'm 
going to show how you too can in- 
spect and change any legal file on any 
disk. 

There are two different operation 
sequences we will cover. First we will 
select, open, and read a file into mem- 
ory. Then we will modify the file and 
write it back to the disk. We will do 
all this within GEM using C. 

THE FIRST PART 

The GEM environment provides a 
standard way to examine the disk 
directory and select a filename 
through the AES call fsel_input(). 

Before the call is made, you must 
prepare string space for a pathname 
and filename, and prepare a memory 
location to store a returned "button" 
value. The pathname is a string 
describing which directory GEM 
should open. (e.g. "a: * . * "). The file- 
name can be as long as eight charac- 
ters, plus a dot (.), and up to three 
more characters as an extender. So 
you will need to save string space for 
at least 12 characters, (e.g. "file- 
name.ext"). The button value should 
be declared as an integer. (Note: all 
data types in this article — except 
strings — will be assumed to be in- 
tegers, unless otherwise noted.) 

When you call fsel_input( path, 
filename, &button );, the familiar 



file selector box appears onscreen and 
GEM takes over control of the com- 
puter until you click on either the OK 
or CANCEL buttons. The path and 
filename you passed to fsel_ 
input() show up in the "directory" 
and "selection" lines, respectively. Ev- 
ery time the user changes the path or 
clicks on a new filename, the path and 
filename strings are updated. 

When the user clicks on one of the 
exit buttons, OK or CANCEL, the call 
is terminated, the selector box van- 
ishes, the number of the button 
pushed (0 = CANCEL, 1 = OK) gets 
placed into its previously reserved 
memory location. The user will find 
the desired path and filename in their 
respective strings. At this point we 
have collected all the information 
needed to properly open a file. 

OPEN, SEZ-A-ME 

Actually opening a file is very easy. 
First, since the routine that opens the 
disk file will return a unique number 
that we will use to reference the file 
with, (the read__handle), we need to 
reserve a place for it. The call to open 
the file itself takes the form: read_ 
handle = Fopen( filename, option 
), where filename is the filename col- 
lected from the fsel_input() call, 
(or a string literal), and option can be 
one of : 0 = read, 1 = write, 2 = read/ 
write. 

When this call is made, the ST will 
locate and open the file requested in 
filename. If the file can't be found, a 
negative error number will be re- 



turned. However, if the file is found 
the routine will assign and return a 
unique positive number we need to 
save in read_handle. The file is 
now open and ready for use. 

READ TO ME ONLY 

Now, before we can read in bytes from 
an open file, we need to take care of 
three other things. First, decide on an 
amount that is equal to, or greater 
than the total bytes you need to read 
in. Here we'll call it max_len. This 
variable must be a LONG. 

Second, reserve or initialize a char 
array that is at least as long as 
max_len. For our demonstration 
we'll call this array file_Jbuffer. 

Third, declare a long variable to 
hold the total number of bytes actu- 
ally read. We'll call this one 
bytes_read. 

Now, to read the file, all the above 
components come together as: 
bytes_ read = Fread( read_ 
handle, max_len, file_buffer );, 
which will read up to max__len 
bytes into file_ buffer out of disk 
file read_handle and return the to- 
tal number of bytes actually read in 
bytes_read. 

WRITE ON! 

When finished working on the file in 
RAM, we need to write the file back 
onto the disk. As with the read rou- 
tine, we first need to select a filename 
to write to, using the call fsel__ 

continued on next page 
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input( ). If you wish, you may use the 
same path, filename, and button 
memory space you set up for reading. 
When you return from the fsel_ 
input( ) call, determine what type of 
file you need to create. The choices 
are: 0 = Read/Write, l = Read Only, 
2 = Hidden from directory search, 
4 = system file, 8 = volume label. These 
attributes are described fully in Disk 
Secrets, ST Resource, February 1986. 

The actual call to create a disk file 
is Fcreate( ), and it takes the form: 
file__ handle = Fcreate( filename, 
filetype );, where filetype is as 
described in the previous paragraph, 
filename is selected from within 
fsel_input( ), and file_handle is a 
memory location we will use to store 
the unique number Fcreate( ) returns 
to us. Later, we will use this number 
to identify the file we write to. 

When we've created the file we 
now need to write our information 
to it from file_buffer. The call to 
write to a disk file takes the form: 
result = Fwrite( file_handle, 
bytes_to_ write, file_ buffer );. 

Here file_buffer is the array in 
which we have our information, 
bytes_to_ write is a long value — 
repeat, a LONG value — that describes 
how many bytes to write. We recieved 
file_handle from Fcreate(), and 
result is the value Fwrite( ) returns 
to us. This will be negative if an error 
occurred while writing, or it will be 
a positive number describing the 
number of bytes actually written to 
disk. 

When finished writing, we need to 
properly close the file using the call 
Fclose( file_handle );. Again, 
file_handle is the variable returned 
to us in Fcreate( ). 

SAMPLE PROGRAM 

We've brought all of the above con- 
cepts together in this month's ST pro- 
gram. You may use either Developer's 
or MegaMax C to type this program 
in. No changes are required when us- 
ing either language. (Sorry, Hippo-C 
owners, this program won't work for 
you without major revision.) Type in 
and save the listing, then compile and 
link your program together. Antic 
Disk subscribers can find the source 
code on the monthly disk as 



FILEIO.C. See the disk's ST Help File 
for instructions on transfering ST list- 
ings to a 3 l h inch disk. 

What we're going to do in the pro- 
gram is read a file off the disk, then 
globally swap one character for an- 
other before writing the corrected file 
back to disk. 

Once you've got the program com- 
piled, linked and ready to go, double 
click and run it. First an identification 
alert box appears, then the program 
will present an alert box asking for the 
character that needs replacing. Click 
on the " + or " + 32" buttons to 
change the ASCII value by whatever 
amount, then click "select" to go on. 
Follow the same operations to select 
the replacement character. And now, 
here come the file selector boxes. We 
select the file to be searched, then the 
file the result will be written to. When 
finished, the program will present a 
"thank-you" box and then exit. 

PROGRAM TAKE-APART 

Examine Listing 1. Again, this pro- 
gram can be written in either Alcyon 
or MegaMax C. At the top are the 
opening comments. We also have one 
^include file here, osbind.h, which 
is included with both languages. Be- 
low that we have a few ^defines, to 
make the source code a bit more read- 
able. Pay close attention to the last 
one, DELAY. I have included it mainly 
to show that we can #define not only 
single characters, but entire state- 
ments. Next come typical int decla- 
rations, char strings, and three long 
definitions (including max_len as 
described above.). 

MAIN( ) 

The main( ) routine is fairly short this 
month, and pretty much does what 
it says: initialize( ). It then selects the 
characters to work on, the files to 
work on, and performs the work. 
When finished becomes TRUE, we 
terminateO the application. 

picky, picky. . . 

The first routine here, pick_ 
character(), presents an alert box 
that describes the current character 
selected. It will stay in the loop liter- 
ally while( button does_not_ 
equal SELECT). If the user clicks on 



either the " + 1" or " + 32" buttons, the 
program logic adjusts the character 
count accordingly and stays in the 
loop. The next routine, pick_ 
replacement ), operates in exactly 
the same manner. 

Notice the last half of the 
while. . .wend loop. These three 
routines first convert the stored value 
for the current character into a two- 
digit hexadecimal number, and then 
check to see if the current character 
can indeed be placed on the screen. 
If not then it is replaced with a print- 
able space. 

READING PASSES 

Next we get to read_ the_file(). 
First we alert the user that we are go- 
ing to read a file. The Dgetdrv( ) call 
returns a number (0, 1, 2. . .) describ- 
ing the current drive used — or the last 
drive accessed. We use this number 
as an offset to the file path by adding 
the ASCII value of "A" to it, resulting 
in "A," "B," "C," etc. The next call, 
fsel_input( path, in_filename, 
&button ); presents our file selector 
box. The next line down checks to see 
if the button selected was CANCEL. 
If it wasn't we use the Fread( ) call to 
read in up to max_len bytes into 
our array, file-buffer. We then 
Fclose( ) the file and leave. 

ACTUAL CONVERSION 

The next routine, converts .the_ 
file( ), scans through the array file- 
buffer looking for the replacable 
character and replacing it with the 
desired new character. 

. . .AND HAVING WRIT. . . 

Now we come to write_the_ 
file(), which basically works like 
read_ the_file( ) above. We select a 
file from the file selector box, and use 
the filename gathered there to 
Fcreate( ) a file on the disk, which we 
then write out with the Fwrite( ) call. 
Remember to use a LONG value for 
the number of bytes to write. 

. . .MOVES ON. 

Finally, terminate( ) does just that, by 
saying goodbye, closing the virtual 
workstation, and exiting the appli- 
cation. 

Listing on page 1 24 
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HOLMES & DUCKWORTH FORTH 

Mirage Concepts 
4055 W. Shaw, #108 
Fresno, CA 93711 
(209) 227-8369 
$49.95 

Reviewed by Michael Fleischmann 

Holmes & Duckworth, those pseudo- 
Victorian "micronomists" from 
Mirage Concepts, have introduced a 
complete Forth package for only 
$49. 95. Yes, I said complete. 

H&D Forth is based on the Forth- 
83 standards and allows access to all 
of the ST's memory and GEM com- 
mands, as well as supporting the ST 
graphics, MIDI, and printer com- 
mands. For those of you who are for- 
ever losing your manuals or writing 
all over the pages, this documentation 
comes on disk so you can print it out 
at your leisure. Wait — there's more. 
H&D Forth also supports both float- 
ing point and integer math, all code 
is fully relocatable and there is a run- 
time turnkey system for developers at 
no extra charge. 



If you are unfamiliar with Forth, it 
is a language that has the high-level 
convenience of BASIC but runs at as- 
sembly speeds. In Forth you define 
words to have specific meanings. 
Once these words are defined they 
become part of the language and are 
useable from that point on. In a very 
short time you can have a language 
customized to your own personal 
preferences. 

One drawback to Forth is that it is 
an RPN or "postfix" language, which 
means the values occur first and the 
operators follow. For example 
(1 + 3)* 4 in BASIC looks like 1 3 + 
4 * in Forth — which does take some 
getting use to. The authors of H&D 
Forth, however, do give several excel- 
lent suggestions for what Forth books 
to get to learn the language. 

Holmes & Duckworth originally 
used this Forth for their own software 
development. In fact, their new H&D 
Base is written with it. This new pack- 
age is quite programmer oriented. The 
screen editor is easy to use — though 
somewhat crude. The source code for 



the Forth is on the disk and a simple 
kernel is provided for those of you 
wanting to do applications software. 

H&D Forth deviates from the 
Forth-83 standard in a few ways: The 
first is that H&D Forth's stack is 32 bits 
wide, so there are no double words 
(32 bits) because they are that way by 
default. However, this is a valid con- 
sideration since it gives the program- 
mer access to all of the ST's memory. 
Another deviation is that multiple dic- 
tionaries are not allowed. This deci- 
sion stems from the fact that Holmes 
& Duckworth have used Forth for 
several years and never had need of 
them. Other than these two devia- 
tions, this Forth is a complete stan- 
dard with enhancements to take care 
of unique ST items. 

H&D Forth supports all the stan- 
dard file commands (open, close, 
seek, read, and write) and includes 
simple mouse and graphics drivers. 
The most impressive aspect of this 
Forth is the "turnkey" system. This 
means after you are confident you are 
ready to release your software to the 
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public, you run a little program which 
turns your code and the supporting 
code into a hidden format that can- 
not be read as source. The memory 
image is then saved to disk. 

The concise H&D Forth on-disk 
manual is intended to instruct you 
how to use this version of Forth, not 
to teach you the language from 
scratch. I was quite impressed with its 
straightforwardness. It gave me the in- 
formation I needed to know without 
wasting my time trying to tell me how 
to turn my computer on. 

The three most important things 
you need to know are on the first two 
pages: L Back up the disk and run on 
a copy. 2. Where to go for technical 
help. 3. There are no royalties to be 
paid if you use this Forth. The man- 
ual then tells you how to boot the 
Forth and how to get the Forth source 
listings, ending with the dictionary of 
the Forth language. Although brief, 
the manual is thorough, and with the 
source listings it makes an informa- 
tive package. 

In summary, I give this implemen- 
tation of Forth quite high ratings. It 
does everything a Forth processor is 
supposed to do, it is affordable, it is 
well supported, and it is easy to use. 
If you are considering Forth for the 
ST this is your best. It's one of the best 
buys that I have seen. 



BRATACCAS 

Psygnosis Limited 

US Distributor: Mindscape, Inc. 

3444 Dundee Road 

Northbrook, IL 60062 

(312) 480-7667 

$49.95 

Reviewed by Michael Fleischmann 

Brataccas by England's Psygnosis 
Limited is an animated adventure 
game with ambitious graphics. Your 
character is Kyne, a hero with a price 
on his head. You move through many 
rooms, gather proof of a government 
plot and try to stay alive. Meanwhile, 
the 60-odd inhabitants of this world 
are moving as well — and time rolls 
on. 

Kyne is a genetic engineer who de- 
veloped a way to make a super-being 



in the hopes of improving the qual- 
ity of life for his fellow man. But the 
government has decided that a race 
of super killing machines is a better 
use for Kyne's discoveries. Kyne, on 
learning this, refuses to continue his 
work or reveal what he had already 
learned. Thus, he must go into hiding. 

The government issues a warrant 
for Kyne's arrest, frames him for a 
crime he did not commit, and puts 
out a contract for him with the un- 
derworld. A bit of overkill here. 
Everyone is out to get this guy. 

While fleeing, Kyne discovers that 
Brataccas — a small mining asteroid — 
might hold the answers he needs, so 
he ends up there. As Kyne, you must 
find this proof and get it to the proper 
authorities. 

Brataccas, the first colonized aster- 
oid, has become a favorite haunt for 
miners. With miners comes money 
and with money comes corruption. 
The main things the residents of 
Brataccas understand are bribery, cor- 
ruption and opportunism. They also 
enjoy killing each other — which does 
make staying alive a problem. In other 
words, Brataccas is a very rough 
neighborhood to go snooping around 
in. 

This game comes on an auto-boot 
disk. While loading, some nice mu- 
sic plays to give you something to lis- 
ten to. Then the screen prompts you 
to press any key to start. As the music 
fades, your screen changes to show 
Kyne appearing in the arrivals bay. 

At this point you can start playing 
or press the [HELP] key to display the 
options menu. This menu is very im- 
portant as it pauses the action, allows 
you to set up how you will control 
Kyne, and gives you the ability to save 
and restore a game. It also has a movie 
mode which puts Kyne on auto-pilot 
and he plays the game himself. 

I found the animation to be quite 
good and smooth. The scenery is well 
thought out and detailed. You can 
even see another planet (moon? aster- 
oid?) setting through a window. The 
city is fairly vast with lots of rooms 
to explore and quite a few to figure 
out how to to get into without dying. 

Now the bad news. It seems obvi- 
ous to me that the main programming 
effort for Brataccas was put into the 



animation and not into the player in- 
terface. If you buy the game, don't 
even bother trying to play it with a 
joystick or mouse. Controlling Kyne 
reliably with either of these in a criti- 
cal situation is nearly impossible. And 
even with the keyboard it takes a lot 
of practice. 

The animation slows down to a 
crawl if more than two characters are 
on screen at the same time. Another 
bothersome trait is that if you fall 
down from a raised area all the items 
you are carrying will drop to the floor 
and the other characters try to pick 
them up. (Some might consider this 
a feature, but I found it very an- 
noying.) 

If you want to pick up anything off 
the floor, you had better have pa- 
tience. One time, it took me twenty 
tries to get an object off the floor. Ob- 
jects are another irritation. Even 
though you are carrying the objects 
you cannot examine them, read them, 
or do anything else with them but 
drop them. 

The authors say their interface "im- 
plies action," which means that the 
game tries to sense what you want to 
do and will proceed to do it for you. 
Most of the time for me, it meant run- 
ning into walls at full speed. 

Talking to other characters is an- 
other matter. You cannot speak to any 
other character unless they address 
you first. When you do get a chance 
to talk, don't be too near the other 
character as your ballon (just like in 
the comics) goes over the top of theirs 
so you end up guessing what the 
other was saying. 

To sum it all up, for all its impres- 
sive graphics and hi-tech, Blade Run- 
ner plotline, I really can't say Brataccas 
is one of my favorites. It's too slow 
for arcade action and too limited for 
an adventure. It was fun, but less so 
than I would expect. On a scale of 1 
to 10 I would have to give it a 5. 

continued on page 93 
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COMPUTER PALACE we know atari! 

~ m mm W m m I rain^Bj CALL US AT (503)683-5361 FOR INFORMATION 




FEATURES for VIP PROFES- 
SIONAL users only: 

2-key macro ability for com 
mon function; such as saving 
and printing. 

Several templates use special 
macros to ease the use of 
graphing and copying func- 
tions. 

VIP PROFESSIONAL is a 
trademark of 
VIP TECHNOLOGIES 



TEMPLATES INCLUDED: 

• CHECKING ACCOUNT REGISTER 

• DEPRECIATION SCHEDULE 

• LOAN AMORTIZATION SCHEDULE 

• RENTING vs BUYING A HOUSE 

• PERSONAL FINANCE STATEMENT 

• SAVINGS RATE COMPARISON 

• IRA WITHDRAWAL SCHEDULE 

• NAME AND ADDRESS DIRECTORY 

• HOME INVENTORY 

• INVESTMENT PORTFOLIO 

• INVESTMENT COMPARISONS 




• Four function 10 key calculator •Telephone/Name Index also 
for use with mouse or ten key wi,n telephone dialer. 

• Appointment Calendar with 90 • Set alarm functions for any day 
year variable span. in the year. 

In the future you'll be able to use your computer to organize your 
desk without having the clutter of the Calculator. Telephone / Name 
Index, Appointment Calender, Alarm Clock, all over your desk. The 
future is here! With Helpmate ST you can use your mouse to organize 
your desk top, leaving extra room for more important tasks. All those 
desk accessories are hidden away until you need them Use the pull 
down menus with many ST programs or by themselves. 



Trie- City 



Only $34.90 



This is a role-playing/adventure game that surpasses any you have 
ever played before. Alternate Reality incorporates the ultimate in 3D 
graphics with original music that weaves through the game to 
establish the illusion, an Alternate Reality. The whole adventure 
begins when you captured by aliens and transported to another 
planet. The sun rises and sets, rain falls, and secret doors lead you 
into unexpected perils and delights. Improve yourself physically, 
mentally, morally, financially to reach your ultimate goal: Either 
return to Earth or seek revenge on your abductors. 




One of the most versatile data-base 
programs available. 

800, XL, XE 39.95 



Features Includes: 

• Lighting fast retrieval 

• Fast Sorts on any field 

• Supports up to 4 drives 

• Single or double density 

• Store about 1100 records 
per disk side in double 
density 

• On-screen prompts 

• Help-screens 

• State abbreviation table 



• Redefinable fields 

• Print labels 1, 2, or 3-up 

• View records on screen 

• Search on any field (Fast 
sort on name field - 1 sec. 
to find a name out of 1000) 

• Much more! 




• No commands to memorize 

• GEM implemented windows, 
menus and mouse control. 

• Fully meets home and small 
business needs 



On-line help facility 
Uses less memory than other 
spreadsheets which means 
more room for spreadsheet 
templates 



ST CALC is a fully implemented GEM based spreadsheet program for 
home and small business use. If you are looking for a powerful, easy- 
to-use spreadsheet to do any calculation from balancing your check 
book to 'What If estimates on Cost/profit analysis, this is it. Why buy 
a program that costs 3 times as much and is not as easy-to-use. ST 
Calc has all the functions you need to get results, at an affordable 
Drice. 



Quest of the Avatar 

Only $49.90 



INCLUDED WITH PACKAGE: 

• 16 times larger than Ultima III « 1 (Metal) Ankh. cloth map. 

• 2 disks full, 4 sides reference card. 

• Book of Magic and History of 
Britannia 

The long-awaited Ultima III sequel is finally here! Ultima IV is the 

latest in a series of epic fantasy role-playing adventure. You are in 
quest to become the perfect mortal by becoming enlightened in the 
eight virtues. Valor, Honor, Justice. Humility. Sacrifice. Spirituality, 
and Honesty Of course there are still many Monsters which must be 
fought, but your main goal is to become an Avatar. This game will 
take a lot of reading from - The History of Brittania and The Book of 
Magic Spells - included with the Ultima IV. before you are ready to 
make the most exciting journey of your mortal life. 



SPECIALS 



V 0NLY 7.95 Each V 



DONKEY KONG 


9.95 C 


PACMAN/QIX 


14.95 C 


METEOR STORM . 


4.95 D 


DIGGER BONK ... 


7.95 D 


VISICALC 


9.95 D 


GORF 


3.95 C 


INV.TO PRG.3 


7.95 D 


LETTER WIZARD . . 


29.95 D 


SANDS EGYPT 


14.95 D 


POOL 400 


14.95 C 


XL BOSS 


49.50 H 


10 PRECISION D 


9 95 0 


MUSIC MAJOR 


7 95 D 


MINER 2049ER 


5.95 C 


10 PRECISION DISKS 


9.95 D 


No Documintation 




Tapes Only j£ 




FANCY FONTS ^ 




MATHS FOR FUN 




SPACE GAMES 




INSTEDIT 




BRAIN BOGGLERT 




MINI WORD PROC 




MUSIC MAJOR 




DIGGERBONK 




DATA BASE DIALER 





GUESS WHO'S COMING TO 

DINNER 

MARATHON 

BOB S BUSINESS 

PROTO'S GAME 

GRADE BOOK 

FONETONE 

MEMORY MAP 

DISPLAY LISTS 



0'^ 



#1 DISPLAY LISTS 
#2 SCROLLING 
#3 PAGE FLIPPING 
#4 BASICS OF ANIMATION 
#5 PLAYER MISSILE GRAPHICS 
#6 SOUND & MUSIC 
#7 DISK UTILITIES 
#8 CHARACTER GRAPHICS 
#9 GTIA, GRAPHICS 9-11 
#10 SOUND EFFECTS 
#11 MEMORY MAP TUTORIAL 
#12 S.A.M. TUTORIAL 
r RICKY TUTORIALS #1-#6 $24.95 
TRICKY TUTORIALS #7-12 $24.95 

FOR 800XL 
NEWELL 

256K RAM 
ONLY $69.50 

NOW UPGRADE THE 800XL TO A 
POWERFUL QUARTER MEG 
SOME INSTALLATION RE- 
QUIRED. 




The best machine language book 
available for the Atari 800, XL, 
XE 



OUR LIBRARY 

D \s* SPECIALS!!! v/v 

$7.95 EA. $7.95 EA. $7.95 EA. 



GAMES DISK #1 
GAMES DISK #? 
GAMES DISK #3 
GAMES DISK #-1 
DEMOS DISK * 1 
DEMOS DISK #2 
DEMOS DISK #3 
UTILIT IES #1 
UTILITIES #2 
UTILITIES #3 
ACTION DISK #1 
ACTION DISK »7 
ACTION DISK #3 
tDUC DISK #1 
fcDUC DISK n 
EDUC DISK n 



EDUC DISK #4 

EDUC 0ISK#b 

EDUC DISK ^6 

EDUC DISK47 

EDUC DISK ^8 

EDUC DISK #9 

EDUC DISK #10 



$5.95 each 

WIZ OF WOR C 
DELUXE INVADERS C 
GORF (Not for XL) C 
MINER 2049ER C 



BEST OF ACE #1 
BEST OF ACE K? 
BEST OF ACE #3 
BEST OF ACE H 
BEST OF ACE #5 
BEST OF ACE #6 
BEST OF ACE*7 
BEST OF ACF #8 
BEST OF ACE #9 
BEST OF ACF #10 
BEST OF ACE #11 
BEST OF ACE*1? 
BEST OF ACE #13 
BEST OF ACF #14 




PROTECT YOUR INVESTMENT 

DELUXE 
DUST 
COVERS 

Custom fitted, attractive leather brown color: 

• ATARI NEW 130/65XE & 520/1040ST, 
400.800.600/800/1200XL.410. 810, 1050. 1025. 
1027. CX85 

• ST, EPSON. GEMINI, PROWRITER printers 

• ST, INDUS, RANA. PERCOM. TRAK, disk drives 

Additional covers 
ordered at same time 



ONLY 



$8.95 EACH | ONLY $7.95 



EACH 





> 








ONLY 




9.95 


DISK NOTCHER 


HARDWARE 




LEGEND 808 


199.00 


PANASONIC 1091 


299.95 


PANASONIC 1092 .... 


399.50 


OKIMATE 10 


179.50 


EPSON LX-80 


249.95 


1050 DISK DRIVE 


149.91) 


INDUS GT 


249.95 


lOMEG.H.D.DRIVE(XL) 


829.95 


SWIVEL BASE STAND 


29.95 


OAK MONITOR STAND 


39.95 


XM 301 MODEM 


44.90 


MPP 1000E MODEM . . 


59.95 


UCALL POCKET MODEM 


129.95 


MPP1150 PRINTER INTF 


59.95 


16K RAM (800 only) . . 


17.95 


ST GAMES 




JOUST 


24.50 


SUNDOG 


33.90 


ULTIMA II 


49.50 


BRATACCUS 


39.50 


HACKER 


39.95 


BORROWED TIME . . 


44.90 


TRANSYLVANIA 


34.95 


MUDPIES 


26.90 


WINNIE THE POOH .... 


39.50 


BACKGAMMON 


31.50 


WISHBRINGER 


34.90 


PERRY MASON 


39.50 


TIME BANDITS 


44.90 



ST PROGRAMS 



VIP PROFESSIONAL 


138.50 


HELP CALC ST 


24.95 


ST CALC 


49.95 


OSS PASCAL 


67.50 


H&D FORTH 


44.90 


PHILON BASIC 


69.90 


HABAC 


59.90 


CP/M EMULATOR 


39.90 


THE FINAL WD 


109.50 


REGENT SPELL 


39.50 


DEGAS 


34.90 


EASY DRAW 


129.50 


DB MASTER 


39.90 


H&D BASE 


79.90 


ZOOMRACKS 


64.90 


ST TALK 


17.95 


PC INTERCOM 


97.50 


ST BOOKS 




STMACH LANG. 


19.95 


ST INTERNALS 


19.95 


ST GUIDE 


16.95 


PROG. THE 68000 


22.95 


ST APPLICATIONS . 


5.00 


ST LOGO 


17.95 


BASIC TO C 


16.95 


COMMON CFUNC 


17.95 


ADV. C TECH 


19.95 


C PROGRAMMING 


29.95 




Only 29.95 

Beautifully finished stand to 
hold your ST monitor, 2 disk 
drives, a modem, e\c . . . 



E 



COMPUTER 
PALACE 



VISA 



OPEN M-F. 9-6 Sat 10-4 (Pacific Time) 
2160 W 11th Avenue Eugene, Oregon 97402 




USE YOUR CREDIT CARD & CALL 

Toll Free 1-800-452-8013 
* ORDERS ONLY, PLEASE * 

There 's ne ver a penalty for using your credit card! 
For Information, Call (503) 683-5361 
Prices subject to change without notice. 



SHIPPING INFO: Minimum S2 90 Ground $4 75 Air Actual 
Cost depends on weight Call (503) 683-5361 for information 
WARRANTY INFO: Everything that we sell is warranted by 
the manufacturer If any item purchased from us fails to per- 
form properly when you receive it. call us at (503) S33-5361 
so that we can assist you No returned merchandise accepted 
without authorization Defective software will be replaced 
with another copy of the same program otherwise no soft- 
ware is returnable 

. 2 Day Air Shipping AVAILABLE • 



PRODUCT NEWS 

continued from page 91 

BORROWED TIME 

Activision, Inc. 

P.O. Box 7287 

Mountain View, CA 94039 

(415) 960-0410 

$49.95 

Reviewed by Sol Guber 

It's 1934. You are Sam Harlow, private 
eye. Nice guy, usually, but someone 
wants you dead. Guess who? Think 
fast. You're living on Borrowed 
Time. 

Borrowed Time is an illustrated text 
adventure game that has several very 
nice gimmicks which set it above the 
average. The illustrations enhance 
both the story and the puzzle. Two es- 
sentials for solving the mystery are a 
map of the town and a dossier of the 
approximately 30 characters in this 
morality play. 

Borrowed Time is very well writ- 
ten and much thought and effort 
went into making the game very play- 
able. This version used all the Atari 
520ST's strengths admirably. 

There are over 100 pictures in this 
game and the graphics are excellent, 
subtly utilizing all 16 available colors 
to good advantage. Scenes are loaded 
from the disk when any room or area 
is observed. However, after a room is 
vacated the picture is still stored in 
RAM. So upon returning to a room, 
the picture appears instantly. 

Due to the difficulty of the various 
puzzles, the picture appearing most 
often is the killer, a truly frightening 
thug. The second most common pic- 
ture — of which there are five ver- 
sions — are the tops of your scuffed, 
size- 12 brogues. Harlow seems to like 
putting his foot into places where it 
does not belong — including his 
mouth. 

There is a slight amount of anima- 
tion in many of the pictures, as well 
as a sense of humor. For example, 
there is a blind newsstand vendor 
wearing dark glasses. Of course, his 
dog has dark glasses and wags his tail 
in the picture. Boss Farnham waves 
his finger at you, water glugs in the 
glass bottle, and the woman knitting 
in the doctor's office moves her knit- 
ting needles. 



Activision has designed a nice 
mouse interface for their adventure 
games. The pictures use about two- 
thirds of the top half of the screen. 
There is a list on the right side of the 
screen of frequently used action and 
object words. Click on any of the 
words, and they appear within the 
typing area. The mouse can also be 
used to pick up and discard objects. 
Your inventory of objects is always 
displayed in a bar in the center of the 
screen. 

Activision has also made the game 
even easier to play by using the func- 
tion keys for shortcuts to perform 
many frequent actions. Function keys 
handle such things as: SAVE GAME, 
LOAD GAME, TELL ME ABOUT 

, DROP , QUICKSAVE, 

QUICKLOAD, etc. While this does not 
make the puzzle any easier, it does 
make for more convenient playing. 
QUICKSAVE, for example, should 
definitely be used if you hear some- 
one breathing down your neck — or a 
gun being cocked — and you want to 
get away in a hurry. Remember, you 
are living on Borrowed Time. 

Two disks come with this game. I 
wish to commend Activision for put- 
ting the saves on the second disk. It 
becomes cumbersome to have a two- 
disk game plus a third disk for saving 
the game. 

Borrowed Time is a good adven- 
ture. It is of moderate difficulty. The 
pictures are excellent. The story is 
good. It will take a great deal of ef- 
fort to solve the puzzle and see all the 
illustrations. The use of the mouse is 
very effective. The use of the list of 
words on the screen is distracting af- 
ter a bit, but does save some typing. 
Activision has done an excellent job 
with Borrowed Time. You will spend 
many enjoyable hours in 1934. 



New 
Products 

Hippopotamus Software stopped by the 
ST Resource offices to demonstrate one 
of the hottest products we've seen for the 
ST yet, HippoVision (tentatively 
$139-95). Yes, it's a video digitizer that can 
digitize images from any standard video 
signal— TV, videocamera, VCR, etc. The 
beta test version that we saw worked in 
low or high resolution. The screen refresh 
rate was fast enough to actually watch 
moving digitized pictures on the ST. Any 
captured picture is saved in DEGAS or 
NEOchrome format for later fun. Also, 
HippoVision is the first product to use the 
ST cartridge port. 

Hippopotamus Software, Inc., 985 
University Avenue, Suite #12, Los Gatos, 
CA 95030. (408) 395-3190. BETA. 



Major databases are beginning to appear 
for the ST. H & D Base ($99-95) from 
Mirage Concepts, is a relational database 
program compatible with dBase II. The 
fascinating twist to this product is that, be- 
cause it is written in Forth, you can "turn 
on" the Forth language and program in 
Forth as well as dBase. You can also ac- 
cess GEM commands in this manner. 

Mirage Concepts, 4055 W. Shaw, #108, 
Fresno, CA 93711. (800) 641-1441. In Cal- 
ifornia (800) 641-1442. FINAL. 

The Manager is a powerhouse relational 
database system from the Canadian firm 
of BMB Compuscience. Priced tentatively 
at $169.95 (with a $149.95 introductory 
tag), The Manager is described by its cre- 
ators as a "paperless office" which will of- 
fer mainframe capability with virtually un- 
limited storage. This is no small software 
package. The Manager comes with six 
disks. And yet it can still be used on a 
520ST with TOS in RAM. 

BMB Compuscience Canada, Ltd., 500 
Steeles Avenue, Milton, Ontario L9T 3P7, 
Canada. (416) 876-4741. PRESS. 

ST books are beginning to appear in the 
bookstores. Compute! Publications has 

continued on next page 
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added to their list with The Elementary 
Atari ST (S16.95). This spiral-bound vol- 
ume introduces new owners to their 
machines, then proceeds — mostly 
through BASIC examples— to explain 
graphics, disk I/O, printer use, and so on. 

Compute! Publications, Inc., P.O. Box 
5406, Greensboro, NC 27403. (919) 
275-9809. FINAL 

For those interested in Modula-2, Hayden 
Books will be happy to get you started 
with their Modula-2 Programming 
(S21.95). This 223-page book is aimed at 
the "novice and experienced programmer 
alike." Though the book is not aimed at 
ST owners, there are enough generic pro- 
gramming examples to keep the Atari 
reader busy. 

Hayden Book Company, 10 Mulholland 
Drive, Hasbrouck Heights, NJ 07604. 
(201) 393-6306. FINAL. 



And Osborne/McGraw-Hill is jumping on 
the ST bandwagon with their introductory 
Atari ST User's Guide ($15-95). This 
book explains how to unpack your com- 
puter, how to move the mouse, and how 
to get about on the desktop. It goes on to 
demonstrate various uses of LOGO with 
several programming examples. At a 
slightly higher level, from the same com- 
pany, is The C Primer ($17.95). This is 
a revised and updated 303 -page version 
of the original volume by Les Hancock and 
Morris Krieger. 

Osborne/McGraw-Hill, 2600 10th Street, 
Berkeley, CA 94710. (415) 548-2805. 
FINAL 



Abacus Software has announced several 
new books for the ST, including Atari ST 
for Beginners, Atari ST Peeks and 
Pokes, Atari ST BASIC Training 
Guide, and Atari ST from BASIC to C. 
All are $ 16.95, with the exception of the 
latter book, which is 519.95. Abacus is also 
releasing a revised version of their first vol- 
ume, Presenting the Atari ST ($16.95). 

Abacus Software, 2201 Kalamazoo S.E., 
Grand Rapids, Ml 49510. (616) 241- 
5510. PRESS. 



Mindshadow ($49.95), the Acti vision 
graphics adventure, is now available on the 
ST. This latest port from the 8-bit world 
starts on a mysterious — and hazardous — 



island and travels through swamps, jun- 
gles and caves. Danger galore! 

Activision, Inc., RO. Box 7286, Mountain 
View, CA 94039. (415) 960-0410. 
FINAL. 



You say your mouse ball is getting dirty 
from rolling around on that gritty com- 
puter tabletop? Try the Mouse Pad 
(S9-50, plus $1.50 postage). According to 
its makers, this 8x9 l /2-inch foam pad 
enhances cursor control and reduces 
fatigue. 

West Ridge Designs, 305 N.W. 12th Ave- 
nue, Portland, OR 97209. (503) 248- 
0053. FINAL. 



David Beckemeyer Development Tools, 
makers of the UNIX-like Micro-C Shell, an- 
nounces MICRO RTX ($69.95), a fully 
multi-tasking extension to GEMDOS. Ac- 
cording to Beckemeyer, multiple TOS ap- 
plications can he used concurrently with 
many background applications running 
while the foreground application is active. 

David Beckemeyer Development Tools, 
592 Jean Street #304, Oakland, CA 
94610. (415) 658-5318. PRESS. 



There's excitement in the graphics com- 
munity! Migraph has completed Easy 
Draw (S 149. 95). This is an object-oriented 
graphics package which utilizes GEM per- 
haps more completely than any product 
available. Similar to GEMDraw, Easy Draw 
is a two-disk package that uses GDOS and 
Digital Research's virtual output system for 
the first time (more on this in later issues). 
Features include rubber banding, sizing 
and stretching boxes, multiple windows, 
multiple zoom, and more. 

Migraph, 720 South 333rd Street, Suite 
201, Federal Way, WA 98003. (206) 
838-4677. FINAL. 



And still more graphics. Bitmap, Inc. has 
compiled a disk collection of several 
NEOchrome pictures (many of which 
were digitized on a Macintosh and ported 
to the ST). Load them into your favorite 
paint package and color-fill them to your 
heart's content. The Bitmap Coloring 
Book is S 18.95. Just be sure and stay 
within the lines. 

Bitmap, Inc., Box 237, Westwego, LA 
70094. (504) 891-4862. FINAL 



Supra Corporation has completed their se- 
ries of hard drives for the ST. First avail- 
able is be the 10MB drive — which was just 
sent to ST Resource for testing. This will 
soon be followed be 20, 30, and 60 mega- 
byte drives. Prices are $799 for 10MB, 
S1095 for 20MB, S1495 for 30MB, and 
$1995 for 60MB. 

Supra Corporation, 1133 Commercial 
Way, Albany, OR 97321. (503) 967- 
9081. FINAL 



Philon Fast/BASIC-M (S129) is now 
available, for those of you who find ST 
BASIC just a tad clumsy. This is a full com- 
piler BASIC aimed, really, at the developer 
market. Six disks are included in the pack- 
age and Philon recommends using a hard 
disk drive when using the product. 

Philon, Inc., 641 Avenue of the Americas, 
New York, NY 10011. (212) 807-0303. 
FINAL. 



The Mark Williams Company has a num- 
ber of products coming out. First is a word 
processor, Let's Write ($79.95 until May 
31 then $99.95). This is a "Micro Emacs" 
style text editor. Included in the package 
is a spelling checker and the Kermit tele- 
communications program. Also from 
Mark Williams is a new C compiler called 
Let's C (S75) and csd (S75), a C source 
debugger. 

Mark Williams Company, 1430 W. 
Wrightwood, Chicago, IL 60614. (312) 
472-6659. FINAL/PRESS/PRESS. 



Lamar Micro has developed a 6 5 CO 2 
Cross Assembler ($89.95) which will let 
you develop software for 8-bit, 6502 
machines on your speedy 16-bit ST. 

Lamar Micro, 2107 Artesia Boulevard, 
Redondo Beach, CA 90278. (213) 374- 
1673. PRESS. 



New ST product notices are compiled 
from information provided by the 
products' manufacturers. Antic as- 
sumes no responsibility for the ac- 
curacy of these notices or the perfor- 
mance of the product. Each mention 
is followed by a code word indicating 
that, at press time, Antic had seen a 
FINAL marketable version, near-final 
BETA, earlier ALPHA, incomplete _ 
DEMO, or PRESS release. Q 



94 



ANTIC, The Atari Resource 
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ATARI 65XE 




2 Free Programs! 

$89" 



520ST SYSTEM PACKAGE 



MONOCHROME 
SYSTEM 

$649°° 




COLOR 
SYSTEM 

$79900 



COMPLETE SYSTEM PACKAGE INCLUDES: 

520ST computer with modulator, disk drive, mouse, logo, 
Basic, 1st Word, NEOchrome sampler and monochrome or 
color monitor. 



ATARI 130XE 



1 . IIM, I II 
j . " / f 11 ( M { i I f 
/ { i v { , ( . W. (((lit , 



2 Free Programs! 

$13900 



ATARI 1050 

DISK DRIVE 

DOS 3.0 




$13900 



INDUS 

ATARI GT DISK DRIVE 
$19900 



COMREX 

DOT MATRIX PRINTER 

• 50 cps 

Automatic Pin Feed • Cable included 




Direct connect, 
no interface 
needed 



$89." 



ATARI 
PRINTERS 



1020 

Printer 

$29" 



1027 Printer $119 00 




ATARI 

Arcade 
Champ 

INCLUDES: 

• Pac Man 

• Qix 

• ROM Holder 

$9.99 

Order No. AA7102 



MODEMS 



ATARI 1030 $59." 

ATARI 835 $39." 

Digital Devices 

U-Call Pocket Modem 599." 

Anchor Volksmodem $59-" 

Supra 1000E $74." 

Supra 1200AT $189." 

Supra 1200ST $189" 



ROKLAN SOFTWARE 



INTERFACES 

Digital Devices 

Ape Face $49" 

U-Print A $59" 

U-Print 16K $69" 

ICD PR Connection $59" 

Supra Micro Print $39" 

Supra 1150 $49" 

Supra 1151 (1200XL) $54" 

ATARI 850 
INTERFACE 



YOUR 
CHOICE 



$3" each 



$129.°° 

Order No. AA850 



Deluxe Invaders 
Anti Sub Patrol Gorf 
Wizard of Wor 
Space Journey 
Journey to Planet 
Rack-Em-Up 
Diamond Mind 



DISKETTES 

Nashua 5 1 /4" SS/SD (10) $8»» 

Maxell 3V 2 " SS/SD (10) $18*» 

Maxell 5V4" SS/SD (10) $11*9 

Elephant 5V4" SS/SD (10) $11»» 

Generic w/case (10) $1199 

Amaray Disk Tubs $9" 



Atari ROM Specials 



AA4005 
AA4008 
AA4011 
AA4012 
AA4013 
AA4024 
AA4025 
AA8030 
AA8039 



Video Easel 
Space Invaders 
Star Raiders 
Missile Command 
Asteroids A A 

Galaxian ^2 



YOUR 
CHOICE 



ea 



Defender 
E.T. PHone Home ROM 
Eastern Front ONLY 



Avalon Hill Software 

your choice $3"each 



Conflict 2500 
Stocks & Bonds 
Guns of Fort Defiance 
Football Strategy 
Flying Ace 
Viet Cong 
GFS Sorcress 
Market Forces 



Facts in Five 

Space Station Zula 

Paris in Danger 

Vorrak 

Gypsy 

TGIF 

Divex 

Legionnaire 







CALL TOLL-FREE 1 -800-233-8950 

477 East Third Street, Dept. B606, Williamsport, PA 17701 

SHIPPING: Add 3%, minimum $7.00 shipping and handling on all orders. Larger shipments may require additional charges 
All items subject to availability and price change. Returned shipments may be subject to restocking fee. 




DtHensciue 



1-800-268-3974 

Ontario/Quebec 



1-800-268-4559 

Other Provinces 



CANADIAN ORDERS 

All prices shown are for U.S.A. orders. 
Call the Canadian Office for Can. prices. 



1-416-828-0866 

In Toronto 



Telex :06 218960 

2505 Dunwin Drive, 
Mississauga, Ontario 
Canada L5L1T1 




dWar^ 
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EDUCATIONAL SOFTWARE 

A unique set of educational programs that features a full range of topics with both 
audio and visual reinforcement. 




Educational Software can be Fun 

MindWare was written to keep the interest of both children and adults. With a real 
voice (not computerized) that talks and instructs the student and simple graphics, 
MindWare promises to keep the attention span of the student! 

Look . . . Listen . . . Learn 

MindWare features the unique look . . . listen . . . learn feature. The voice and screen 
work together to reinforce each other to offer one of the strongest learning devices. 
And, periodic quizzes allow the student to progress only after each question has 
been answered correctly. 

Offers Advanced Subjects 

MindWare contains elementary to advanced subjects, from elementary reading 
and math skills to classics, advanced algebra and atomic and nuclear physics. 

Easy to Use 

Each MindWare package contains a series of four programs on two cassettes. 
Each cassette will automatically load and run, so, you don't have to be a computer 
genius to run them. Use the order form below to order your MindWare educa- 
tional packages today, only $24.95 per package of four programs! 




« > 



MATH DEVELOPMENT 

Skill builders from Fractions to 
Advanced Algebra and Business 
Math. 

□ Fractions 1 MW023 

□ Fractions 2 MW002 

□ Fractions 3 MW027 

□ Fractions 4 MW001 

□ Fractions 5 MW038 

□ Special Skills 1 MW042 

□ Special Skills 2 MW022 

□ Circles & Graphs MW016 

□ Introduction to Algebra . . . MW010 

□ Algebra MW009 

□ Geometry MW036 

□ Advanced Algebra 1 MW048 

□ Advanced Algebra 2 MW007 

□ Business Math 1 MW034 

□ Business Math 2 MW032 

BUSINESS DEVELOPMENT 

Skill builders for those interested 
in pursuing a career in business. 

□ Careers in Business MW029 

□ Office Skills MW011 

□ Accounting MW005 

□ Business Math Skills 1 . . . MW045 

□ Business Math Skills 2... MW044 

□ Business Communications MW012 

□ Business Writing 1 MW013 

□ Business Writing 2 MW033 



FORM/LIST OF 

ENGLISH DEVELOPMENT 

Covers Spelling to Diction and 
Phonics. 

] Spelling MW030 

□ Diction MW047 

□ Phonics 1 MW028 

□ Phonics 2 MW039 

□ Phonics 3 MW024 

□ Phonics 4 MW025 



AVAII 

PERSONAL SKILLS 
DEVELOPMENT 

Help develop additional skills and 
self-improvement. 

] Health & Safety MW031 

□ U.S. History MW014 

□ Auto Mechanics MW015 

□ Philosophy MW004 

□ Self-Improvement MW003 



SCIENCE DEVELOPMENT 

Covering the basics of Electronics, building volcabulary and understand- 
ing necessary for the complexities of Physics. 

□ Electronics 1 MW050 I ] Physics 1 MW006 

□ Electronics 2 MW008 □ Physics 2 MW035 



KAGES 

READING DEVELOPMENT 

Volcabulary and comprehension 
builder from Elementary to Classics. 

□ Reading Development 1 . . MW041 
Reading Development 2 . . MW043 

~ Reading Development 3 . . MW021 

□ Reading Development 4 . . MW017 
- j Reading Development 5 . . MW018 

□ Reading Development 6 . . MW020 
: j Reading Development 7 . . MW019 

□ Reading Development 8 . . MW049 

□ Classics 1 MW040 

□ Classics 2 MW026 

Each listing (example: Fractions 1 MW023) 
contains four related programs. 



MindWare is distributed by Datamost, Inc. 
V Atari is a trademark of Atari, Inc. 



H DATAMOST 

21040 Nordhoff Street, Chatsworth, CA 91311 



Order 5 or more and Save over 10% 



Please send the MindWare educational packages indicated 
above. I have enclosed a check or money order payable to 
Datamost, Inc. for the grand total amount. 
(Sorry, no CODs or credit cards) 
Please allow 2-4 weeks for delivery. 

Name 



Address . 
City 



Number of Packages ordered 
at $24.95 each 

10% discount (5 or more) 

SUBTOTAL 

Calif. Residents add 6 1 /2% 
Sales Tax 

Shipping/Handling 
$2 per package (1-4 packages) 

$1 per additional package 

Add $3 to foreign orders 

GRAND TOTAL 



State . 



-Zip 



Enclose Check or Money Order (Payable 
to Datamost, Inc.) for grand total. 



- ■ - 



m. 





520ST PACKAGE 



• 520 Computer • Mouse • SF 354 
Disk Drive • Logo, Basic, 1st. Word, 
and Neochrome Sampler • B & W or 
color. 

CALL FOR PRICE 



130XE PACKAGE 

39995 

W ^0 ^0 COMPLETE 

130 XE Computer, 1050 Disk 
Drive, 1027 Letter Quality 
Printer, Atari Writer Plus. 




65 XE PACKAGE 

COMPLETE 

65 XE Computer, 1050 Disk 
Drive, 1027 Letter Quality 
Printer, Atari Write Plus. 



COMPUTERS | 

520 Computer with 
Modulator, Mouse, Logo, 
Basic, 1st Word and 
Neochrome 

Sampler CALL 

130XE 

Computer 1 29.95 

65XE 

Computer 99.95 

800XL 

Computer 69.95 

| DISK DRIVES I 

Atari 1050 

Disk Drive 1 49.95 

SS/DD 

Atari SF 354 360K 

Disk Drive CALL 

SS/DD 

Atari SF 314 720K 

Disk Drive CALL 

DS/DD 

Indus GT 199.95 

SS/DD 



MODEMS I 

MPP Supra 

1000E 69.95 

XM 301 CALL 

Volksmodem 

12 199.95 

Volksmodem Cable 
520ST to Modem 1 2.95 
Volksmodem Cable 
toC-64orC-128 .12.95 



Not responsible for typographical 
errors. We reserve the right to 
limit quantities. 



I PRINTERS 

Star Micronic SG10, Near 
Letter Quality ... 210.95 

Power Type, Daisy 

Wheel 279.95 

Gemini 

10X 179.95 

Atari 1027 

Printer 139.95 

| MONITORS I 

Atari SC1224 12" RGB 
Color Monitor . . . 335.95 
Atari SM124 

12" Monitor 175.95 

Commodore 1802 
13" Color Composite 

Monitor 179.95 

13" Color Composite 

Monitor 139.95 

Thomson 14" RGB, Color, 
Composite Monochrome 

Monitor CALL 

Thomson 12" 
Monochrome, Green 
Screen with 

Speakers 79.95 

12" Amber Goldstar 
Monitor 69.95 

I DISKETTES I 

Nashau 

5Va", SS/DD 8.95 

Nashau 

5 1 /4", DS/DD 12.95 

Sony 

3 1 / 2 ", SS/DD 27.95 

Sony 

3 1 /2", DS/DD 35.95 




Paper 

2700 Sheets 39.95 

Paper 

1000 Sheets 17.95 

Includes Shipping 

Nibble Notch 7.95 

Flip/File 10 4.95 

Flip/File 60 14.95 

Pro 5000 

Joystick 11.95 

Surge 

Protector 1 9.95 



PRINTER 
INTERFACES 



Ape Face 49.95 

U-Print 64.95 



PRINTER 
RIBBONS 



SG10&SG10C 

Black 2.95 

Red 4.95 

Blue 4.95 

Green 4.95 

| DUST COVERS I 

For All Models 
Call For Price 

And AvailabUty 
Scotch 5 1 A" Head 
Cleaning Kit 7.95 

| SOFTWARE | 

Software Titles Too 
Numerous To List 
Please CALL 
For Information 
and Prices 




-722-4002 



6 DAYS A WEEK 10 AM to 8 PM E.S.T. 




CUSTOMER SERVICE & 
NEW YORK ORDERS: 



Call 51 6-488-21 58 



MAIL ORDERS TO: WORLD TRADE, EXECUTIVE OFFICES 
2075 JERICHO TURNPIKE, NEW HYDE PARK, NEW YORK, 11040 



All C.O.D's above J 400 require 15% deposit. Check, Money Order, MC or VISA accepted / Call for shipping and handling information / NYS residents add 
applicable sales tax / Prices and availability are subject to change without notice / Air factory fresh merchandise with manufacturer's warranty. Dealers 
welcome. Call for recent price reductions and new rebate information. Order phones are open Mon.-Sat. 1 0AM-8PM E.S.T., Sun. 1 2PM-5PM. Customer Service: 
Mon.-Fri. 10AM-3PM. Returns must have return authorization. »5 mln. shipping charge. 



r New ^ 

520ST & 1040ST 

Database Management 
System 






THE AMAZING VOICE MASTER® 

Speech and Music Processor 

g0 Your computer can talk in your own 

voice. Not a synthesizer but a true digitizer 
that records your natural voice quality— and in 
any language or accent. Words and phrases can 
be expanded without limit from disk. 

And it will understand what you say. a 

real word recognizer for groups of 32 words or 
phrases with unlimited expansion from disk 
memory. Now you can have a two way conver- 
sation with your computer! 

Easy for the beginning programmer 

with new BASIC commands. Machine language 
programs and memory locations for the more 
experienced software author. 

Exciting Music Bonus lets you hum or 
whistle to write and perform. Notes literally 
scroll by as you hum! Your composition can be 
edited, saved, and printed out. You don't have to 
know one note from another in order to write 
and compose! 

Based upon new technologies invented by COVOX. One low price buys you the 
complete system — even a voice controlled black-jack game! In addition, you will 
receive a subscription to COVOX NEWS, a periodic newsletter about speech 
technology, applications, new products, up-dates, and user contributions. You will 
never find a better value for your computer. 

ONLY $89.95 includes all hardware and software. 
Available from your dealer or by mail. When ordering by mail add $4.00 shipping 
and handling ($10.00 foreign, $6.00 Canada). 

The Voice Master is available for the Commodore 64, 128, Apple He, He, II+, and 
Atari 800, 800XL, 130XE. Specify model when ordering. (Apple II+ owners must 
have joystick adapter. Available from Covox at only $9.95.) 

Apple lie and II+ owners: Enhance speech quality and music capabilities with 
optional Sound Master hardware card. Installs in slot 4 or 5. Available separately 
for $39.95 with demo software, or order with Voice Master for only $1 1 9.95 (saves 
$10 when ordered separately). 

For telephone demo, additional information, or prompt service for credit card orders, 



CALL (503) 342-1 271 H 



Call or write today for FREE audio demo cassette tape and brochure. 




COVOX INC. 



(503) 342-1271 



675-D Conger Street, Eugene, OR 97402 

Telex 706017 (AV ALARM UD) 



^ Database Management 

i^JI I I Xrf" System, brings modern database 

technology to your fingertips. dbOne™ is fast, 
efficient, easy to use, and gets down to business 
right away. And there's no programming! 

dbOne's quick response lets you power through 
mailing lists, invoices, payrolls, sales orders, or 
inventory. Change your mind in the middle of a 

project, and dbOne will revise the entire file 
structure without losing data. 

dbOne indexes your files by any field, and 
searches out just the records you want to see. And 
all indexes are automatically updated whenever you 
add or change data. 

dbOne builds data input screens automatically! 
Custom reports come together in no time. What 
you see is always what you get! 

dbOne automatically generates mailing labels, 
and mail merges with form letters to give your 
correspondence a thoroughly professional look. 

dBASE n® files are 100% compatible 

dbOne reads and writes dBASE II files 
immediately; there's no need for messy data 
conversion! 

dbOne comes with 6 ready-made data files 
including screens and reports. Put them to work 
just as they are, or modify them to suit your exact 
needs. 

• Inventory Control • Checkbook Manager 

• Credit Card Record • Mail Merge Builder 

• Address Book • Mailing Label Generator 

dbOne's powerful report writer produces clear 
and professionally formatted reports complete with 
headings, columns, sub-totals, totals, and page 
breaks. 

dbOne's documentation is second to none. It's 
like a short course in database management, with 
clear explanations and hands-on examples. And 
experienced power users can jump to the quick 
reference section to get right to work. 

/Only OXM brings you modern databaseN 

technology for just $99.00! J 

See your Atari dealer or call now to order: 
Toll Free (800) 321-2600 (24 hours) 
For more information: (213) 427-2080 



(8:30 - 5:00 PST) 



C 



OXffi, Inc. 

3428 Falcon Avenue 
Long Beach, CA 90807 



dbOne it a trademark of AJS Publuhing, Inc. 
dBASE 0 if a registered trademark of Ashton-Ttfe. 
Atari STf) ST and 1040 ST are ir*lemarkj of Atari. Inc 



O19S6 0XXL Inc. 




A Receive our disk based catalog and 
pricebook. 

A Buy from people who specialize in ATARI 
exclusively. 

A Receive our 8 pg. newspapers 9 times a 
year filled with critiques, special tips, and 
classified ads. 

A Get at least 25% off all titles (and often 
more!). 

A Receive consistant low prices and prompt, 

knowledgeable service. 
A Choose from over 1,500 software items. 



JOIN 

CompuClub 

JL Where Atari owners b 



TM 



belong. 

800-MY-ATARI 



To join by phone 
call toll free 
in Mass call 617-879-5232 
Please have credit card number ready! 
Or return this coupon with $5.00* 



TM 



■ rr 



YES, I want to be a preferred customer of 
CompuClub" Rush me mv catalog and price 
book. Enclosed please find my$5. 00 registration 
fee. 

Please make check payable to compuclub" 
Payment enclosed "check n money order 

Bill my □ Mastercard ^Visa Expires 

ID# 



Signature 
Name 



n 



I Cn 



Address 
City 



.State. 



-Zip. 



Atari Model . 



Hours: Mon. Fn 1133 AM 7 oo pm Eastern rime 
Answering services after hours 
ComDUClUb". PO BOX 652. NatlCk MA 01760 
'Overseas membership $25.00 per year 
Jf^ Atari - Trademark of Atari Corporation 
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MODULA-2 

the successor to Pascal 



• FULL interface to GEM DOS, AES 
and VDI. 

■ 32-bit native code implementation with 

all standard modules. 
» Full screen editor linked to compiler 

for rapid error detection. 



■ Smart Linker/Automated desktop. 
1 Installs on hard disk and RAMdisk. 
' Supports transcendental functions 

and real numbers. 

■ CODE statement for assembly code, 
i Modula-2 is NOT copy protected. 



RAMdisk Benchmarks 


Compile 


Unk 


Execute 


Seive of Eratosthenes 


10 


21 


5.3 


Null Program 


7.1 


5.5 





Added features of Modula-2 not found in Pascal 



■ CASE has an ELSE and may contain 
subranges 

i Dynamic strings of any size 

■ Machine level interface 

Bit-wise operators 
Direct port and Memory access 
Absolute addressing 
Interrupt structure 



■ Programs may be broken up into 
Modules for separate compilation 

» Multi-tasking is supported 
i Module version control 

■ Open array parameters (VAR r: ARRAY 
OF REALS:) 

■ Type transfer functions 

• Definable scope of objects 



Pascal and Modula-2 source code are nearly identical. Modula-2 should be thought of 
as an enhancement to Pascal (they were both designed by Professor Niklaus Wirth). 



Regular Version: $79.95 Developer's Version: $149.95 

The developer's version supplies an extra diskette containing a symbol file decoder, 
link and load file disassemblers, a source file cross referencer, symbolic debugger, 
high level Windows Module, and the Resource Compiler. 



10410 Markison Road 
Telex: 888442 



SOFTWARE, INC. 
Dallas, Texas 75238 ■ (214) 340-4942 
Compuserve Number: 75026,1331 



SUPER 3D PLOTTER II 

By: R. Constan <M985 



★ ★ BEYOND BELIEF! ★ ★ 

If you have any interest in 3D computer animation and image design, get ready to watch your 
so-called "game machine" out-perform every 8-bit machine on the market today! SUPER 3D PLOT- 
TER II is a complete 3D image design, display, and animation package for your Atari computer. 
Thanks to some new and very powerful "natural" algorithms developed by Elfin Magic, detailed 
hi-res images can be rotated and maneuvered at an amazing projection rate of 3 to 6 screens per 
second! This is the kind of animation that was considered impossible for an Atari. Believe it!! THIS 
PROGRAM ALLOWS MORE REAL TIME CONTROL THAN ANY CURRENTLY AVAILABLE 3D SYS- 
TEM FOR ANY-8 BIT MACHINE. SUPER 3D PLOTTER II also contains two full-featured, memory- 
resident editors: Enter your images via numeric data, or right on the screen with a joystick! Here 
are just some of the truly amazing features of this package. 

# UNSURPASSED 3D PROJECTION SPEED 



t TRUE HIDDEN SURFACE ELIMINATION 
AND SOLID (COLOR FILL) PROJECTION. 

t SUPER HI-RES PRINTOUT TURNS YOUR 
DOT-MATRIX PRINTER INTO A PEN PLOTTER 1 

• PRICE: 



• 2 EXTENSIVE EDITORS, PACKED WITH 
UTILITIES, FOR ULTIMATE DESIGN FLEXIBILITY. 

• EASY DISK FILE SAVING, LOADING AND 
MERGING OF IMAGES. 



• SCREEN "OVERLAY" AND "SAVE" FEATURES 
FOR INFINITE IMAGE EXTENSION, AND TOTAL 
COMPATIBILITY WITH MOST DRAWING PROGRAMS 



0NLV $39.95 

NY. RESIDENTS ADD SALES TAX 

Don't be fooled by the low price! This package is usable in professional 3D C.A.D, applications, 
and this ad does not permit space for a fair description! Send S.A.S.E. for more info, or send check 
or money order to: 



Hfttt ilagtr 

23 Brook Place, E. Islip, NY 11730 



FOR ALL 8-BIT ATARI COMPUTERS 
WITH 48K AND DISK DRIVE 
PRINTER OPTIONAL 




-SOFTWARE WITH IMAGINATION— 



CIRCUIT DATABASE II 



This is an enhanced version of the electronic circuit (SCHEMATIC) drawing program I present- 
ed in the Nov. 1984 issue of ANALOG Computing. Th s program allows easy design and editing 
of electronic circuits, and storage of up to 60 complete, labeled diagrams on a single side of a 
disk! This new version includes several added circuit symbols, plus a special "TEXT TO HI-RES" 
converter, which produces neat, vertical printouts on any dot-matrix graphics printer having a ver- 
tical printhead. The editor is so friendly, you can almost draw your circuits on screen faster than 
you could scribble them out with pencil and paper. And, it's written in plain, listable Atari BASIC, 
with full documentation on all machine language routines (USR calls), so you can use them in 
your own programs. CIRCUIT DATABASE II is a must lor anyone concerned with the electronics 
field, from weekend hobbyist to professional. In fact, in today's world of fast-moving technology, 
it is almost unthinkable that you (or your children) will never be exposed to electronic circuits in 
some form. Now, you can be ready— and at a price you can't resist. 

°nly $12.95! OR SEND S.A S.E. FOR MORE INFO AND SAMPLE PRINTOUTS' 



High-Resolution CompuServkGrqphics Converter 8-bit or ST 



ATARI* HARDWARE & SOFTWARE BONANZA 

CALL TOLL FREE 1 800 551 9995 CALL TOLL FREE 1 800 551-9995 



800/400 MODULES 8 1 0 MODULES 



NEW PARTS COMPLETE WITH ICS 

$Q 50 



All Modules 
Complete 
with 
IC's 



• 800 Main Board 

• 800/400 CPU with GTIA 

• 800 1 OK "B"0.S. Module 

• 16K RAM CX853 

• 400 Main Board 

• 800 Power Supply Board 

• 800XL Modulator 



810 Side Board $29.50 

810 Side with Data Sep . . $39.50 

810 Power Board $15.00 

810 Analog Board $10.00 

Data Separator $12.50 

MISC. HARDWARE 

256K UPGRADE BOARD 

For 800XL $88.00 

w/o RAM IC's $58.00 

C021697 $13.50 

Fastchip for 800/400 . . . .$17.50 

1030 Modem $57.50 

Numeric Keypad $15.00 

1050 FDC 2793 $19.50 

BOARD SETS 

800 4 PIECE BOARD SET 

Includes 800 Main. CPU, 10K ROM, 
and Power Board $28.50 

810 Board Set 

Sideboard with Separator, Rear Power and 
Analog Boards $57.50 

POWER PAOKS 

Replacement Transformer for 
800/400, 810, 1050, 1200XL, 

1020 $14.50 

800XL/600XL, 

1 30XL Power Supply . . . $25.00 
1027 Transformer $25.00 

Mail Order and Repair 1 5338 Inverness St., San Leandro, CA 94579 

Business Address 1988 Washington Ave., San Leandro, CA 94577 

NO MINIMUM ORDER! We accept money orders, personal checks or C.O.D.s. 
VISA, Master/Card okay. Credit cards restricted to purchases over $20.00. No 
personal checks on C.O.D. - Shipping: $4.00 shipping and handling on orders under 
$150.00. Add $2.00 for C.O.D. orders. California residents include 6Vi% sales tax. 
Prices subject to change without notice. 
Much more! Send SASE for free price list. 

'Atari is a registered trademark of Atari Corp. 



INTEGRATED CIRCUITS 




• CPU . . 

• CPU . . 


. C014337 
. CO10745 


• PIA . . 


. CO10750 




• ROM . 


.C012399B 


• Antic . . . C012296 


• ROM . 


. C012499B 


• Pokey . . C012294 


• ROM . 


.C014599B 


• PIA C014795 


• GTIA . 


. CO14805 


•CPU . . . C014806 


• Delay . 


. CO60472 



DISK DRIVE 

CUSTOM 810 DRIVE 

Fully operational 810 mounted on acrylic 



base. No case. Includes 
power supply. g 



I/O 



95 



cable and 
00 



AMERICAN TV 



MANUALS 

SAM'S Service Manuals for 800 or 400 

or 800XL $19.50 ea. 

De Re Atari $12.50 

Inside Atari Basic $ 5.00 

Pilot Primer $ 5.00 

850 Operators Manual . . . .$15.00 

BARE BOARDS 

850 Interlace Board $10.00 

Includes Parts List, Instructions. 

810 Rear Board $ 1.00 

810 Analog Board $ 1.00 

CONNECTORS 

I/O 1 3PIN PC Mount $ 4.50 

I/O Cable Plug Kit $ 4.50 

30 Pin Cart. Socket $ 4.50 

EDITOR/ASSEMBLER 

Editor/Assembler Cartridge 

Write your own High Speed 6502 

Machine Language Programs. 

Written by Atari. Works with all Atari 

Computers except St. 

Manual Included S15.00 

BASIC CARTRIDGE 

Basic Rev. "A" Cartridge works with 
all Atari Computers except ST. 
Includes manual. 

800XL Owners Note! Use this Cart 
ridge while programming to elimi- 
nate the severe errors in the Built- 
in "B" Basic $10.00 



SOFTWARE 

O.S.S. Action $68.00 

O.S.S. Mac/65 $68.00 

O.S.S. Basic XE $68.00 

O.S.S. Basic XL $48.00 

ST-M-Disk $35.00 

ST-Easy-Draw $109.00 

ST-O.S. Pascal $68.00 

ST-Basic Compiler $79.00 

Donkey Kong Cart. $5.00 

Pac-Man Cartridge $5.00 

Eastern Front Cart $5.00 

Buck Rogers Cart $5.00 

Crossfire Cart $5.00 

Chicken Cartridge $5.00 

Picnic Paranoia Cart $5.00 

Mr. Cool Cart $5.00 

Clown & Balloon Disk .... $5.00 

Stratos Disk $5.00 

Serpentine Disk $5.00 

Lymbrynth Disk $5.00 

Magneto Bugs Disk $5.00 

The Factory Disk $5.00 

The Pond Disk $5.00 

Missile Command $5.00 

Defender Cart $5.00 

Spanish Lessons $7.50 

Basic Cartridge $10.00 

Editor Assembler Cart $15.00 

Q'Bert Cartridge .$10.00 

Popeye Cartridge $10.00 

Kindercomp Cart. $10.00 



CALL TOLL FREE 

1-800-551-9995 



SERVICE RATES 

Rat Service Rates below In- 
clude Parts A Labor, 60-Day 
Warranty 

800 $39.50 

850 $39.50 

600XL $49.50 

1200XL $49.50 

810 $69.50 

800XL $49.50 

1050 . . v $85.00 

800 Keyboard Repair . . . .$25.00 
Above units repaired or exchanged 
with rebuildable exchange. Include 
$7.00 return shipping and insurance. 

10K Rev. "B" O.S. Upgrade 

for older 800/400's 
End printer/disk drive timeouts and 
OTHER ERRORS. Many new programs 
require Rev. B. Type the following 
peek in Basic to see if you have 
Rev. B. PMNT PEEK(58383). If the 
result equals 56 you have the old 
O S. Thrtt CMp ROM set wM \m- 
ttructiens .... $7.50. Cemptota 10K 
Rev. B meduki $9.50 

GTIA Upgrade For 800/400 

Add additional graphics modes and 
make your older computer com- 
patible with the latest software. 
InstnicttMf induM $4.50 

810 Drive Upgrade 

Greatly improve the performance of 
your older 810. Stabilize the speed 
with the addition of an analog and 
redesigned rear board, 
tnitructieei Included $27.50 



IN CA CALL 

415-352-3787 



SOFTWARE 
LIBRARY 




type-in listing section includes every full-length program 



from this issue. 

► 1900-2100 PERPETUAL CALENDAR 

MICRO JULIUS 104 

► BUSINESS DECISION ANALYSIS TECHNIQUES 

DECIDE 105 

► CALCULATE THOSE INGREDIENT CHANGES 

RECIPE CONVERTER 108 

► COMPUTERIZED WEATHER FORECASTS 

WEATHER WIZARD 112 

► NEW OWNERS COLUMN 

LESSON 4: NESTED LOOPS 114 

► GAME OF THE MONTH 

BOMB SQUAD 115 

► FIRST ST BASIC APPLICATION 

BASIC BIORHYTHMICS 119 

► MANIPULATE ANY ST DISK FILE 

FILE I/O INTRO 124 

► ELEGANT DESIGNS FROM SIMPLE EQUATIONS 

MATH ART 127 

TYPING SPECIAL ATARI CHARACTERS 102 

HOW TO USE TYPO II 103 

ERROR FILE 103 



DISK SUBSCRIBERS: Programs for 8-bit Atari computers can be used immediately. 
Just follow instructions in the accompanying magazine articles. ST Owners: See monthly 
disk's ST Help File for instructions on how to transfer programs to 3-1/2 inch disk. 

No part of this publication may be reproduced, stored in a retrieval system, or transmitted, in any form or by any means, 
electronic, mechanical, photocopying, recording or otherwise, without the prior written permission of the publisher. 

Antic program listings are typeset on the Star SB-10 printer — from Star Micronics, Inc., 200 Park Avenue, New York, 
NY 10166. 
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TYPING SPECIAL 
ATARI CHARACTERS 

Antic printed program listings leave a small space between each Atari Special Character for easier reading. Im- 
mediately below you will see the way Antic prints all the standard Atari letters and numbers, in upper and lower 
case, in normal and inverse video. 

ABCDEFGHIJKLMNOPQRSTUUMXYZ 

HfflHmaaafflDiJtaamfflmamfflBDfflfflffiHHa 

abcdefshi JKinnopqrstuvwxyz 

mraamsosmHBisDrommBEiaBiomEicsQms 

0123456789 EIHHBHHHHSH 

The Atari Special Characters and the keys you must type in order to get them are shown in the two boxes below. 



NORMAL VIDEO 



FOR 


TYPE 




FOR TYPE 




THIS 


THIS 




THIS THIS 






CTRL 


| 


• CTRL T 




tB 


CTRL 


A 


y CTRL U 




□ 


CTRL 


B 


C CTRL V 




ffl 


CTRL 


C 


B CTRL W 




91 


CTRL 


D 


B CTRL X 




B 


CTRL 


E 


H CTRL Y 




0 


CTRL 


F 


ffl CTRL Z 




S 


CTRL 


G 


I ESC ESC 




a 


CTRL 


H 


♦ ESC CTRL 




Q 


CTRL 


I 


+ ESC CTRL 




E 


CTRL 


J 


«■ ESC CTRL 


+ 


a 


CTRL 


K 


■► ESC CTRL 


* 


E 


CTRL 


L 


♦ CTRL . 




n 


CTRL 


M 


• CTRL ; 




□ 


CTRL 


N 


III SHIFT = 






CTRL 


0 


n esc 




* 


CTRL 


P 


SHIFT 




a 


CTRL 


0 


CLEAR 




B 


CTRL 


R 


i ESC DELETE 


m 


CTRL 


S 


► ESC TAB 





INVERSE VIDEO 



FOR 


TYPE 




FOR 


TYPE 


THIS 


THIS 




THIS 


THIS 


□ 


A CTRL 




0 


ACTRL Y 


D 


A CTRL 


A 


B 


ACTRL Z 


1! 


A CTRL 


B 


□ 


ESC 


a 


ACTRL 


C 




SHIFT 


a 


A CTRL 


D 




DELETE 


a 


ACTRL 


E 


□ 


ESC 


a 


ACTRL 


F 




SHIFT 


B 


ACTRL 


G 




INSERT 


B 


ACTRL 


H 


□ 


ESC 


r 


ACTRL 


I 




CTRL 


n 


ACTRL 


J 




TAB 


n 


ACTRL 


K 


0 


ESC 


a 


ACTRL 


L 




SHIFT 


B 


ACTRL 


M 




TAB 


B 


ACTRL 


N 


□ 


ACTRL . 


a 


ACTRL 


0 


□ 


ACTRL ; 


H 


ACTRL 


P 


u 


A SHI FT = 


C 


ACTRL 


Q 


□ 


ESC CTRL 2 


B 


ACTRL 


R 


a 


ESC 


Q 


ACTRL 


S 


CTRL 


□ 


ACTRL 


T 




DELETE 


B 


ACTRL 


U 


D 


ESC 


n 


ACTRL 


V 


CTRL 


o 


ACTRL 


W 




INSERT 


a 


ACTRL 


X 







Whenever the CONTROL key (CTRL on the 400/800) or SHIFT key is used, hold it down while you press the 
next key. Whenever the ESC key is pressed, release it before you type the next key. 

lUrn on inverse video by pressing the Reverse Video Mode Key Ql . Turn it off by pressing it a second time. 
(On the 400/800, use the Atari Logo Key^instead;) 

Among the most common program typing mistakes are switching certain capital letters with their lower-case 
counterparts— you need to look especially carefully at P, X, O and 0 (zero). 

Some of Atari Special Characters are not easy to tell apart from standard alpha-numeric characters. Usually the 
Special Characters will be boxed. Compare the two sets of characters below: 



SPECIAL 



E9 

s 

f—1 

e 
m 



a 

Q 

a 
a 

a 



CTRL F 
CTRL G 
CTRL N 
CTRL R 
CTRL S 



STANDARD 

/ a i 

N B SHIFT + 
- 5 SHIFT - 
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HOW TO USE TYPO II 



TYPO II is the improved automatic proofreading program for Antic's type-in BASIC listings. It finds the exact 
line where you made a program typing mistake. 

Type in TYPO II and SAVE a copy to disk or cassette. Now type GOTO 32000. When you see the instruction on 
the screen, type in a single program line without the two-letter TYPO II code at left of the line number. Press 
[RETURN]. 

Your line will reappear at the bottom of the screen with a two-letter TYPO II code on the left. If this code is not 
exactly the same as the line code printed in the magazine, you mistyped something in that line. 

To call back any line previously typed, type an asterisk [*] followed (without in-between spaces) by the line number, 
then press [RETURN]. When the complete line appears at the top of the screen, press [RETURN] again. This is also 
the way you use TYPO II to proofread itself. 

To LIST your program, press [BREAK] and type LIST To return to TYPO II, type GOTO 32000. 

To remove TYPO II from your program, type LIST 'T>: FILENAME "0,31999 [RETURN] (Cassette owners LIST U C:). 
Type NEW, then ENTER "D.FILENAME" [RETURN] (Cassette— ENTER "C:). Your program is now in memory without 
TYPO II and you can SAVE or LIST it to disk or cassette. 

Owners of the BASIC XL cartridge from O.S.S. type SET 5,0 and SET 12,0 before using TYPO II. 



Don't type the 
TYPO II Codes! 



Don't type the/^w 
TYPO II Codes! \^ 



UB 32088 REM TYPO II BY ANDY BARTON ET 32128 ? 

UM 32810 REM UER. 1.8 FOR ANTIC MAGAZINE M * POSIT 

H5 32820 CLR I DIM LINE* C120J : CLOSE »2:CL0 CE 32130 C 

SE »3 QR 32148 P 

BN 32838 OPEN »2 , 4 , 8 , "E : OPEN «3,S,8,"E" LINE$=" 

YC 32848 ? M H M i POSITION 11,1:? "UnUIillMMI" 0T0 328 

UU 32158 F 

EM 32858 TRAP 32848 : POSITION 2,3»? "Type ANS+cC* 

in a progran line" UJ 32168 C 

HS 32868 POSITION 1,4:? M "sINPUT »2;LINE JU 32178 C 

**IF LINE$="" THEN POSITION 2,4:LIST B EH 32188 H 

I GOTO 32868 BH 32198 L 

XH 32878 IF LINE $ c 1 , 1 ) = THEN B = U AL CLIN HB 32288 H 

E$C2,LENCLINE$*>J POSITION 2,4:LIST B s IE 32218 P 

GOTO 32868 cLCODEJ 

TH 32888 POSITION 2,18:? "C0NT" UG 32228 P 

MF 32898 B = UAL cLINES* : POSITION 1,3*? "J t Match 

NY 32188 POKE 842,13*5TQP boue.": 

CN 32118 POKE 842,12 



: POSITION 11,1:? "■MUlsJdlMMHIl 

ION 2,15:LIST B 
=8 : ANS=C 

05ITI0N 2,16:INPUT »3;LINE*«IF 
" THEN ? "LINE ";B;" DELETED" I G 
58 

OR 0=1 TO LEN CLINE«> : C=C+1 : AN5= 

ASC CLINES CD, D>>> « NEXT D 

ODE = INT cAN5'676> 

ODE = ANS - CC0DE*»676J 

C0DE = INT cC0DE'26> 

C0DE = C0DE- cHC0DE*26> + 65 

C0DE=HC0DE+65 

05ITI0N 8,16:? CHR* cHCODE) ; CHR$ 



OSITION 2,13:? 

press ■[HWfcimwmi 
GOTO 32858 



'If CODE does no 
and edit line a 



j ERROR FILE 



ATARI TOONS 

August 1985 

The 22 nd character in 
line 1090 of listing 2 is 
an A. Also, to load non- 
standard character sets, 
change NUMBER = 1024 
in line 1140 to: 
NUMBER = 2050, and 
change line 1150 to: 
1150 GOTO 1170. 

GUESS THAT SONG 
July 1985 

The September, 1985 
HELP! section contains 
an easier-reading listing 
of some of the tougher 
data lines in Guess That 
Song. 



STAR VENTURE 

July 1985 

Change line 380 to: 

388 IF PEEKC53279 
3=6 THEN SOUND 0, 
0,0,0:GOTO 80 

MUSICIAN 

June 1985 
Change line 790 to: 

798 IF ft=54 THEN 
POSITION 4,22:? *t 
6;"song cleared": 
GOTO 810 

And if you're having 
tempo problems, 
remove line 1720 and 
add the following: 



1715 IF A=14 THEN 
TEMPO=-0-25:GOTO 

1700 

1720 REM REMOVE T 
HIS LINE 

MANEUVER 
April 1985 

If you get hearts on the 
title screen, LIST the 
program to disk or cas- 
sette, type NEW, then 
ENTER and SAVE it. 

FONT MAKER 
FOR SG-10 
March 1985 

The July 1985 issue of 
ANTIC contains a listing 
which, when merged 
with FONT MAKER, 



makes that program 
work on the Star SG-10. 
See the HELP section 
of that issue for 
instructions. 

CUSTOM PRINT 
March 1985 

Custom Print has prob- 
lems printing certain 
characters using re- 
defined characters. 
Change line 5 to: 

5 CS=PEEKC1063~8: 
POKE 106.CS-l:GRA 
PHICS 0:DIM CST5C 
203 iCSTS^"' 
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perpetual calendar 1900-2100 

MICRO JULIUS 
PERPETUAL CALENDAR 

LISTING 1 ^?S5<^ 



RK 16 REM JULIAN CALENDAR 

IJ 12 REM BY CHARLES P05TLE 

GR 14 REM cc> 1986, ANTIC PUBLISHING 

DM 28 DIM A* <62> , C$ c?5> 

JH 38 DIM M*c9> ,DAY*c9> ,I«c2> 

BB 48 DIM T*c2> ,D*c2> ,B**c2) 

GU 58 GRAPHICS 8 * PDKE 82,2 

ZZ 68 ? "This progrflH calculates a number 
of"!? "answers relating to daws and d 
ates" 

FB 78 ? "between March 1, 1988 and Februa 
rw'*i? "28, 2188 usins the Julian Day M 
ethod .••!? 

FM 88 SKIP=1 : ERR = 1 : TRAP 84*? "ENTER DATE 

ssi cM,D,Y>"«? *INPUT M, D , Y 
RJ 82 GOSUB 1748 

OP 84 IF ERR = 1 THEN ? "t*+";*G0T0 88 

XQ 98 TRAP 48888*? *G0SUB 128 

CD 96 J5AFE=JDN»SAFED0W=D0W*5AFEM=M*SAFEY 

= Y i 5 AFED=D 
OK 188 JDN1=JDN 
OS 118 GOTO 188 

GB 128 REM CALCULATE JULIAN DAY NUMBER 
RA 138 IF M=l THEN YY= c Y - 1> * M= CM-H3* * GOTO 
168 

RM 148 IF M=2 THEN Y Y= c Y - 1 > * M= cM+13* * GOTO 
168 

EX 168 IF M>2 THEN M=M*1*YY=Y 
UJ 168 JDN=INTc366.25*YY>+INTC30.6001*M>+ 
D 

ZL 178 RETURN 

XI 188 REM CONUERTS JULIAN DAY NUMBER TO 
DATE 

MT 198 YY=INTCCJDN-122.1»'366.26> 
AS 288 M = INTccJDN-INTc366.25*YY»:>'30.6001 
> 

DU 218 D=JDN-INTC366.26«YY>-INTC38.6881«M 

RU 228 IF M = 14 THEN M=M-13*G0T0 268 

SH 238 IF M=16 THEN M = M13 * GOTO 268 

DE 248 IF M<14 THEN M=M-1*G0T0 258 

XT 268 IF M>2 THEN Y=YY 

UF 268 IF M=l THEN Y=YY*1*G0T0 288 

UT 278 IF M=2 THEN Y=YY*i 

XI 288 GOSUB 1498 

DU 298 REM CALCULATE DAY OF THE WEE K . 

CU 388 D0M= C7«c c CJDN+5J /7> -INT c cJDN+5> /7> 

QQ 318 D0U=l+INTcD0U+1.8E-83> 

UU 328 GOSUB 1638 

RX 338 IF G = 2 THEN RETURN 

UQ 348 REM PRINT M, D , Y a DOW 

JP 358 ? M*;" "jD;", ";Y;" ";DAY* 

AN 368 IF G=l THEN 688 

UQ 378 GOSUB 1888 

BF 388 FOR F=ll TO 22 

IQ 398 POSITION 2,F*G0SUB 1728 

EQ 488 NEXT F 

UY 418 REM MENU 

NE 428 POSITION 2,18 

RL 438 ? *? "CHOOSE A CALCULATION*"*? 

KE 448 ? "II ENTER A NEW DATE TO FIND THE 

DIFFERENCE IN DAYS?" 

PU 468 ? "H SUBTRACT A NUMBER OF DAYS FRO 

M THE ABOUE DATE?" 

UC 468 ? "B ADD A NUMBER OF DAYS TO THE D 

ATE ABOUE?" 

EG 478 ? "CD CHOOSE A NEW DATE?" 

XS 488 ? "H END PROGRAM?" 

EP 498 ? "H DRAW CALENDAR?" 
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ED 688 ? "CHOICE>>"; *CL05E «1*0PEN ssi , 4 , 8 

, " K * " 

KS 518 GET ssi , CH * 5KIP = 8 

RX 528 IF CH<49 OR CH>54 THEN 518 

NZ 538 CLOSE «1 * CH = CH -48 * ? CH 

ZU 548 FOR F=18 TO 21 

UZ 658 POSITION 2,F 

UE 568 GOSUB 1728 

FF 678 NEXT F 

01 688 POSITION 2,11 

EK 598 REM BRANCH TO CHOICE. 

UT 688 ON CH GOTO 618,728,758,788,798,888 

* REM BRANCH ON CH 
MW 618 ERR = 1 * TRAP 625*? "ENTER DATE *s2 CM 

,D,Y>"*? *INPUT M,D,Y 
UX 628 GOSUB 1740 

UK 626 IF ERR=1 THEN ? "♦♦♦"; *GOTO 610 

WB 638 TRAP 48880*GOSUB 120 

PF 640 JDN2=JDN 

JB 668 JDND=ABSCJDN1- JDN2> 

XB 668 G=1*P0SITI0N 2,11*G0SUB 1728*G0SUB 

1728 
PJ 678 GOTO 188 

TJ 688 ? *? "DIFFERENCE^*; JDNDi" DAYS" 

UX 698 GOSUB 1880 

EY 700 G=8 

PS 710 GOTO 380 

OZ 720 ? "ENTER NUMBER OF DAYS TO BE SUBT 
RACTED" 

LA 730 INPUT JDN2* JDN= JDN1 - JDN2 
PE 740 GOTO 188 

AH 758 ? "ENTER NUMBER OF DAYS TO BE ADDE 
D" 

JK 768 INPUT JDN2*JDN=JDN1+JDN2 
PK 778 GOTO 188 
RM 788 GOTO 68 
JJ 798 ? "H"*END 

MK 888 REM FINDS THE FIRST DAY OF THE MON 
TH. 

CX 885 JDN1=JSAFE*D0W=SAFED0W*M=SAFEM* Y=5 

AFEY * D = S AFED 
ZY 818 W=D*D=1*G=2*G05UB 128 
HQ 828 JDN=JDN1*G0SUB 180 
LS 838 DIF=D0W*2-1 
RT 848 YE AR= Y 

IR 868 REM FINDS THE FIRST DAY OF THE NEX 
T MONTH. 

WI 868 M=M*1*IF M=13 THEN M=1*Y=Y*1 
SF 878 GOSUB 128 

YK 888 REM THE NUMBER OF DAYS ON THE CALE 

NDAR. 
XP 898 E=JDN-JDN1 

PA 988 REM ASSIGNS DAYS TO A* MATRIX 
CY 918 FOR X=l TO E 

QL 928 IF X<18 THEN B*ci,l>=" "*B*c2,2>=5 

TR* CX> * A* CX*2-1, X*2>=B* * GOTO 958 
GE 938 A*CX*2-1, X*2>=" " 
UE 948 A* CX*2-1, X*2>=5TR$ CXI 
MD 958 NEXT X 

YW 968 REM FIGURES THE DAY TO BE HIGHLITE 
D. 

EP 978 IF W<18 THEN T$=STR* CWJ * T=A5C cT*» * 

D* cl , 11 =••■•• :D$c2,2)=CHR$cT + 128J *A« CW«2 

-1,U«2>=D**G0T0 998 
UO 988 T*=STR*CWJ * T= A5C cT* cl , 1) * *TT=ASCcT 

*C2,21J *D*ci, 1)=CHRS CT + 128J *D*c2,2>=CH 

R*cTT*128J *A* CW«2-1, WM2i =D$ 
XK 998 REM CLEARS THE LAST TWO DAYS OF TH 

E CALENDAR. 
RA 1000 IF E=31 THEN GOTO 1040 
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UG 1818 FOR X=E*2+1 TO 62 

TO 1828 A$cX,X>=" 

L H 1838 NEXT X 

GL 1848 REM ASSIGNS DAY OF WEEK 5YMB0L5 T 

0 MEEK ONE. 

BU 1858 FOR N=l TO 7 

ZR 1868 READ I* * CS cN*2 - 1 , N*2> =1* 

HN 1878 NEXT N 

NY 1888 GOTO 1188 

TA 1898 DATA 51! , MO , TU , WE , TH , FR , 5 A 

OB 1188 FOR N = 8 TO 37 

NG 1118 C* CN*2-1 , N*2> =" 

HA 1128 NEXT N 

NC 1138 REM MATCHES DAYS TO CALENDAR. 

PL 1148 L=LENCA$> 

NL 1158 C$cDIF,L+DIF>=A* 

MB 1168 REM PRINTS CALENDAR. 

10 1178 ? "*":POKE 789,8:P0KE 82,8 

TB 1188 ? ";M$;","; YEAR 

XB 1198 ? "BeBBBeHHBeBBfflBBBBHBBBffl" « ? "Ill" j 

•REM TOP 

ZD 1288 FOR H=l TO 7 

TL 1218 ? C$ cH*2-l, H*2) ; "til"; 

EO 1228 NEXT H 

EH") 

IX 1248 FOR H=8 TO 14 

TX 1258 ? C$ CH*2~1» H*2> ; ■•HI" J 

FA 1268 NEXT H 

HT 1278 ? :? •'[flBBSHBfflBBBHBSBBSBSBBBtfl" : ? 

di" ; 

RT 1288 FOR H=15 TO 21 

UJ 1298 ? C$ CH*2-1 , H*2> ; "Hi"; 

EK 1388 NEXT H 

HD 1318 ? :? ,, lFBSfSBBWBBSBB*BB#BSWBB9i" * ? " 

1 ; 

UF 1328 FOR H=22 TO 28 

TT 1338 ? C$ cH*2-l, H*2> ; " J"; 

EW 1348 NEXT H 

HP 1358 ? :? "WBB*BB*BB*BB#HH#BB*BBai" i ? 
111"; 

XR 1368 FOR H=29 TO 35 

UF 1378 ? C* CH*2-1, H*2* J "HI"! 

FI 1388 NEXT H 

AK 1398 ? I? 

til" j 

XM 1488 FOR H=36 TO 37 

TP 1418 ? C$ cH*2~l, H*2* ; "til"; 

ES 1428 NEXT H 

PE 1438 ? *? 'H9BBBBBP.1" : G = 8 

EO 1448 ? s? :? M MORE cY~N>' 

0 * " K • '* 

EL 1458 GET ttl , YN 



; i OPEN stl, 4, 



QE 1468 IF YN = 89 THEN CLOSE »1:P0KE 82,2: 
RUN 

LU 1478 IF YN = 78 THEN CLOSE ssi:P0KE 82,2s 

GRAPHICS 8 : END 
SD 1488 GOTO 1458 

WL 1498 REM CONUERTS NUMBER TO MONTH. 

UA 1588 ON M GOTO 1518,1528,1538,1548,155 

8, 1568, 1578, 1588, 1598, 1688, 1618, 1628 
IK 1518 M*="JANUARY" * RETURN 
AM 1528 M$ =" FEBRUARY" : RETURN 
QI 1538 M$=" MARCH" * RETURN 
XI 1548 MS="APRIL" : RETURN 
HN 1558 M$="MAY" : RETURN 
OJ 1568 M$="JUNE"» RETURN 
XO 1578 M$="JULY" : RETURN 
XB 1588 M$="AUGUST" i RETURN 
PX 1598 M$="SEPTEMBER" : RETURN 
ZQ 1688 M$="OCTQBER" i RETURN 
UE 1618 M$="NOUEMBER" : RETURN 
DL 1628 M$ = " DECEMBER" * RETURN 

KY 1638 REM CONUERTS NUMBER TO DAY OF WEE 
K. 

UN 1648 ON DOW GOTO 1658,1668,1678,1688,1 

698, 1788, 1718 
UN 1658 DAY$="SUNDAY" i RETURN 
OW 1668 DAYS="MONDAY" i RETURN 
QU 1678 DAY$="TUE5DAY" : RETURN 
IR 1688 DAY$="WEDNE5DAY" i RETURN 
WE 1698 DAY$="THUR5DAY" : RETURN 
JU 1788 DAY$=" FRIDAY" s RETURN 
RY 1718 DAY$=" SATURDAY" : RETURN 
QK 1728 ? " 

" : REM 37 SPACES 
AW 1738 RETURN 

CT 1748 ERR = 8 * REM UALID DATE? 
UO 1758 IF Y<188 THEN Y=Y+i988 
NF 1768 IF M<1 OR M>12 OR MOINKM) THEN 
ERR = 1 

UF 1778 IF Y<1988 OR Y>2188 OR YOlNKYi 
THEN ERR=1 

LZ 1788 IF D<8 OR D>31 OR DOlNTcOl THEN 
ERR = 1 

CL 1798 IF ERR=8 THEN 1798 

ZW 1791 POKE 752, 1«? "♦■UirilWWaWlilM Try aaa 

in." 

KT 1792 FOR DL=1 TO 188»NEXT DL 
DO 1794 ? "t 

WR 1798 POKE 752,8<RETURN 
AC 1888 IF 5KIP=1 THEN 1838 

QL 1818 POKE 752,l:P0KE 764,255:? :? "Pre 

ss any Key to continue." 
AP 1828 IF PEEKC764>=255 THEN 1828 
CZ 1838 POKE 752,8*P0KE 764 , 256 I RETURN 



business decision analysis techniques 

DECIDE 



Article on page 23 



LISTING 1 



Don't type the 
TYPO II Codes! 



BX 18 REM DECISION ANALYSIS PROGRAM 

HU 28 REM BY JEFFREY A. SUMMERS 

GL 38 REM CO 1986, ANTIC PUBLISHING 

SD 48 GRAPHICS 8>BRK=lsIF PEEK €53279* =5 T 

HEN BRK=8 
TO 58 GOTO 78 

PF 68 IF BRK THEN POKE 16,112:P0KE 53774, 
112:P0KE 77,8 



ftG 65 RETURN 
QZ 78 GRAPHICS 1 

ION":POKE 752, 
SY 75 ? »6j" 

LYSIS":? :? 

Hers" 
JF 77 ? I? " 

03" 
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POSITION 6,7:? «6;"DECI5 
l:POKE 718,8 

TREE":? «6;" ANA 
By Jeffrey A. Sum 

(O 1986 Antic Publishi 



KR 88 GOSUB 68:G0T0 10868 : REM INITIALIZE 
DY 588 REM INPUT ERROR TRAP ROUTINE 
PT 585 PRINT »1 ; CHR$ c253> ; 

HJ 518 PRINT «l;"Input error - Please re- 
try" 
LZ 515 TRAP 588 

AN 528 GOTO PEEK C186> +256*PEEK ci87> 
BZ 688 REM FILE ERROR TRAP ROUTINE 
PU 685 PRINT »1; CHR$ C253J ; 
MG 686 CLOSE «2 

RQ 618 PRINT «l;"Error in file handling. 

Please Retry" : GOSUB 28848 
MK 615 TRAP 688 
LL 628 GOTO 18848 

continued on next page 
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BB 1000 REM NEW TREE SELECTION 
RY 1004 REM CLEAR TREE 

UI 1009 CLOSE ttl: OPEN ttl , 4 , 0 , "E i " \ GOSUB 6 
8'PRINT «i;»Ciearing tree for entry... 
it 

RU 1010 FOR 1=1 TO 280!BPTRCI>=0:UALUECI> 

=-l:NTYPEcI>=0:FOR J = l TO 5 
5E 1015 FPTRCI, JJ=:0:NEXT J'NEXT I:LABEL*= 

"••:N0DE = 1'T0P = 2 
NX 1017 TRAP 500 

JQ 1020 PRINT ttl;"Node Types ' " * PRINT ttl ; •• 
1 - Dec i s i on" * PRINT *U"2 - Chance" 

DY 1025 PRINT «li M 3 - TerHinal" 

MT 1026 PRINT ttl;"TVPe' "; 'INPUT ttl, TYPE 

HB 1030 IF TYPE<1 OR TYPE>3 THEN 1020 

HL 1035 NTYPEcNODE*=TYPE'? ttl 

CO 1040 ON TYPE GOTO 1050,1100,1150 

JY 1050 REM DECISION NODE 

IW 1061 PRINT »i;»How Many branches? ";'I 

NPUT **i / NBRANCH 
DA 1055 IF NBRANCH > 5 THEN PRINT ttl;"Too N 

any. Regroup • " ' GOTO 1050 
TX 1060 FOR 1=1 TO NBRANCH i FPTR CNODE , I> =T 

0P?BPTRCT0P3=N0DE:T0P = T0P + 1 * NEXT I 
ZJ 1065 PRINT «lj»Labei: "; 'INPUT ttl,RESP 

ONSE* 

QT 1070 IF LENCRE5PONSESK20 THEN RE5P0NS 

E* CLENCRESP0NSE*>*1>=5PACE* 
DU 1075 LABEL*C28*CN0DE~1>+1,28*N0DE>=RE5 

PONSE* 
OK 1080 GOTO 1200 
GH 1100 REM CHANCE NODE 

IJ 1101 PRINT »l;"How Many branches? •• ; : I 

NPUT ttl , NBRANCH 
QA 1105 IF NBRANCH > 5 THEN PRINT stl;"Too w 

any. Break it up. "'GOTO 1100 
BB 1110 FOR 1=1 TO NBRANCH ' PRINT »l;"Prob 

of branch ; I ; INPUT «l,PROBAB 

WT 1115 FPTRcNODE,I>=TOP'BPTRcTOP>=NODE'P 

ROBcTOP>=PROBAB'TOP=TOP+l'NEXT I 
SO 1120 GOTO 1065 
MR 1150 REM TERMINAL NODE 

GZ 1151 PRINT ttl;»Uaiue' "; 'INPUT ttl,U'UA 

LUECN0DE>=U:G0T0 1065 
SO 1200 REM SELECT NEXT NODE 
UI 1201 1=1 

RC 1210 IF NTYPECI>=0 THEN NODE=l:GOTO 12 
40 

NU 1220 I=I+1'IF I = TOP THEN 10040 
OM 1230 GOTO 1210 

IK 1240 REM HIND BACK TO ORIGIN 
PU 1241 PRINT ttl;»Node tt ; I ; " fron:":ND= 
I 

QU 1250 Nl=BPTRcND> 

DQ 1260 IF NTYPECN1J=2 THEN PRINT ttl;»Pro 

b M ; PROB cND) ; " ; 
WE 1270 PRINT ttl;Nl;" "; LABEL * C28* cNl - H 

+1,20*N1> 

TZ 1280 IF Nl=l THEN GOSUB 20040:GOTO 102 
0 

IK 1290 ND=Nl:GOTO 1250 

JP 2000 REM RETRIEUE TREE SECTION 

NU 2004 TRAP 600 

CP 2005 PRINT tti;"Fiie to recover: ";:INP 

UT «1 , RESPONSE* : GOSUB 20058 
PU 2010 CLOSE «2'0PEN «2 , 4 , 0 , RESPONSE* : GO 

SUB 60 
MX 2020 INPUT tt2,T0P 
YB 2030 FOR 1=1 TO TOP-1 
TC 2040 INPUT «2 , A ' BPTR cl> = A 
GW 2850 INPUT «2, A ' U ALUE cl> =: A 
NX 2060 INPUT tt2, A ' PROB cl> =ft 
UR 2070 INPUT «2, A ' NT YPE cl> = A 
HL 2080 FOR J = l TO 5 ' INPUT »2 , A ' FPTR cl , J> 

= A » NEXT J 
AT 2090 INPUT »2 , RESPONSE* 

QB 2100 IF LENcRESP0N5E*> <20 THEN RESPONS 

E* cLENc RESPONSE** + 1:>=5PACE* 
IK 2110 LABEL$C20*CI-1*+1, c20*D > =RESP0N5 

E* 

WG 2120 NEXT I*? ttl;"File has been read." 

'GOSUB 20040 
GN 2130 CLOSE «2:G0T0 10040 
YZ 3000 REM 5AUE TREE SECTION 
NU 3004 TRAP 600 

GZ 3005 PRINT ttl;»Fiie to save to* ";'INP 

UT ttl, RESPONSE* 'GOSUB 20050 
TK 3010 CLOSE »2'0PEN «2 , 8 , 0 , RESPONSE* t GO 

SUB 60 
TD 3020 PRINT «2;T0P 



YC 3030 FOR 1=1 TO TOP-1 
FM 3040 PRINT »2*BPTRci> 
JC 3050 PRINT »2;UALUECH 
AR 3060 PRINT tt2;PR0Bcl> 
UL 3070 PRINT «2;NTYPEcl> 

PY 3080 FOR J=l TO 5 i PRINT «2 ; FPTR cl , Ji i N 
EXT J 

FM 3090 PRINT «2 ; LABEL* C20* cl - H +1 , 20*I> 
MU 3108 NEXT I'? ttl;"Fiie has been saved. 

"•GOSUB 20040 
GI 3110 CLOSE t*2 * GOT 0 10040 
WK 4000 REM EDIT TREE SECTION 
AW 4004 CLOSE ttl * OPEN «1 , 4 , 0 , "E • " ' GO SUB 6 

0 • TRAP 500 

EL 4010 PRINT ttl;"Node C0 to quit): ";:IN 

PUT ttl , ENODE * IF ENODE = 0 THEN 10040 
WM 4015 EX=NTYPE CENODEJ 
K5 4020 ON EX GOTO 4030,4200,4400 
LP 4030 PRINT t#U"Options- M «? «1 J ? ttl;»0 

- Exit":? «l;"l - Change label" 
D5 4035 ? »1;"2 - Add Branch":? »1;"3 - D 

eiete Branch" 
EF 4040 ? ttli? ttl; "Option ' "; 'INPUT ttl,OP 

T 

RE 4045 IF 0PT>3 OR OPT<0 THEN 4030 
UM 4050 IF OPT=0 THEN 4190 
UJ 4056 ON OPT GOTO 4060,4080,4105 
YS 4060 PRINT ttl;»Label' ";:INPUT *1,RESP 
ONSE* 

RN 4065 IF LENCRESPON5E*><20 THEN RESPONS 

E* cLEN cRESP0N5E*> + D =5PACE* 
EU 4070 LABEL*C28*CENODE-1*+1,20*ENODE>=R 

ESPONSE* 
RA 4075 GOTO 4030 

WM 4080 FOR 1=1 TO 5'IF FPTR CENODE , I > =0 T 

HEN POP 'GOTO 4088 
TD 4085 NEXT I'PRINT *tl;"Too Many banches 

."'GOTO 4030 
XH 4088 1=1 

YO 4890 IF FPTRcENODE,D <>0 THEN 1 = 1*1:60 
TO 4090 

KE 4095 FPTRCENQDE,D=TOP:BPTRCTOP>=ENODE 

'T0P=T0P*1 
IY 4100 PRINT «i ; "Done .": GOTO 1200 
KL 4105 PRINT ttl ; "Br anc hes to nodes nunbe 

red : " 

YJ 4110 FOR 1=1 TO 5 

GB 4112 IF FPTRCEN0DE,I> <>0 THEN PRINT ttl 
; FPTR cENODE, I* ;" "; LABEL* C28* cFPTR cENO 
DE, I) -1>+1,28*FPTR CENODE, I>> 

FR 4115 NEXT I 

XN 4120 PRINT «l;"Cut branch to which nod 

e »? " ; 'INPUT til , BRANCH 
WF 4125 1=1 

DK 4130 IF FPTRCEN0DE,U OBRANCH THEN 1 = 1 

*1'G0T0 4138 
HC 4135 FPTRCEN0DE,I>=8:PRINT «1 ; "Done . ' 

GOTO 4838 
RW 4198 IF EDFLG=8 THEN 4888 
PM 4195 GOTO 1288 

NA 4288 ? »1; "Options-" : ? ttl : ? ttl; "8 - Ex 

it":? tti;-i - Change label" 
UL 4285 PRINT tti;"2 ~ Add Br anc h" ' PRINT tt 

l;"3 - Delete Branch" 
PC 4218 PRINT tti;*>4 - Change Probabilitie 

S": PRINT ttl 
LY 4215 PRINT ttl ; "Op t i on « "; 'INPUT ttl, OPT 

:IF 0PT<8 OR 0PT>4 THEN 4288 
UH 4228 IF 0PT=8 THEN 4198 
HL 4225 ON OPT GOTO 4238,4258,4298,4328 
YN 4238 PRINT tti;-Labei: ";:INPUT ttl,RE5P 

ONSE* 

RI 4235 IF LENCRESP0NSE*><28 THEN RESPONS 

E* CLEN CRESPONSE** + U =SPACE* 
EP 4248 LABEL*c28*cEN0DE~l>+l,28*EN0DE>=R 

ESPONSE* 
QG 4245 GOTO 4288 
UW 4258 1=1 

GP 4255 IF FPTRCEN0DE,I>=8 THEN 4270 

AI 4268 I=I+1'IF I<5 THEN 4255 

NZ 4265 PRINT tti;**Too Many branches . " * GOT 

0 4288 
IY 4278 REM 

HP 4276 FPTRCENODE,U=TOP:BPTRcTOP» =ENODE 
'REM FPTR 

RT 4288 PRINT ttl ; "Probab i 1 i t y ' ";:INPUT tt 
1, PROBAB 

IU 4285 PR0BCT0P>=PR0BA8:T0P=T0P*1:G0T0 1 
288 

BI 4298 PRINT ttl ; "Br anc hes to nodes nunbe 



106 ★ ANTIC SOFTWARE LIBRARY 



JUNE 1986 



redi"*FOR 1=1 TO 5 
HN 4296 IF FPTR CENODE , I> <> 6 THEN PRINT ttl 

; FPTR cENODE, I > ; "; LABEL* C28* cFPTR cENO 

DE, I J -1J + 1, 20«FPTR cENODE, I J a 
EY 4380 NEXT I 

GU 4382 PRINT «l;"Cut branch to which nod 

e « '•; : INPUT ttl, BRANCH 
UD 4385 1=1 

DG 4318 IF FPTRCENODE'D OBRANCH THEN 1 = 1 

+ HGOTO 4318 
FE 4315 FPTR CENODE, I> =8 : PRINT ttl ; "Done . : 

GOTO 4280 

QL 4328 PRINT stl;"NODE PROB"*FOR 1 = 1 TO 

6iIF FPTRcENODE,I>=0 THEN 4325 
SR 4321 PRINT ttl ;FPTRcENODE,I> ; M ";PR 

OBcFPTRcENODE,I>> ; "j 
UT 4322 PRINT ttl;LABELSc20*cFPTRcENODE,I> 

-1> + 1, 28*FPTR CENODE, I J > 
CU 4325 NEXT UPRINT ttl; -New Probabiiitie 

s to node «":FOR 1=1 TO 5 
DE 4338 IF FPTR CENODE , I> =8 THEN 4348 
FI 4335 ? »1;FPTRCEN0DE,I> ;" ";:INPUT «1 

, PROBAB : PROB cFPTR cENODE , I J > = PROBAB 
FK 4348 NEXT I 
QI 4345 GOTO 4288 

NE 4488 ? ttl; "Options- 11 : ? «1 : ? ttl;"8 - Ex 

it"*? «i;"i - Change label" 
UI 4485 ? til; "2 - Change value":? «l 
ZD 4487 ? ttl;"Option* ";:INPUT «l,OPT 
SH 4418 IF OPT < 0 OR 0PT>2 THEN 4400 
NR 4415 IF OPT=0 THEN 4000 
UM 4420 IF 0PT=2 THEN 4450 

ZI 4425 PRINT ttl;"Label* ";*INPUT «l,RESP 
0N5E5 

OS 4430 IF LENcRESPONSES) <20 THEN RE5P0NS 

E$ CL EN c RESPONSE*) +1>=5PACES 
FK 4435 LABELSc20*cENODE-l*+l,20*ENODE:>=R 

ESP0N5ES 
QO 4440 GOTO 4400 

NU 4450 ? ttl;"New Uaiue* ";*INPUT ttl . U 
FB 4455 UALUE CENODE* =Us GOTO 4400 
CR 5000 REM 50LUE TREE SECTION 
NM 5004 TRAP 500 

KH 5010 PRINT ttl; "HiniMize c0> or Haxiniz 

ecu : "; i INPUT ttl , MM 
VB 5020 FOR 1=1 TO TOP-l 

MD 5030 IF NTYPECI><>3 THEN UALUEcI>=-l 

FU 5035 NEXT I 

YH 5040 FOR 1=1 TO TOP-1 

QT 5050 CNODE=I ' REM CURRENT NODE 

SM 5060 IF NTYPEcCNODE* <>3 THEN 5230 

LU 5070 CNODE=BPTR CCNODE* *IF CNODE=0 THEN 

POP :GOTO 5240 
ZE 50B0 IF NTYPE CCN0DE>=2 THEN 5180 
DH 5090 U = - 1 ' IF MM=0 THEN U=10*90 
YR 5100 FOR J=l TO 5 

CN 5110 IF FPTRCCNQDE, J>=8 THEN 5150 

RS 5120 IF UALUEcFPTRcCNODE,J>>=-l THEN P 

OP {GOTO 5230 
UQ 5130 IF MM=1 AND U < UALUE cFPTR cCNODE , J> 

* THEN U=UALUE CFPTR CCNODE, J>> 
UT 5140 IF MM=0 AND U > UALUE cFPTR cCNODE , J> 

> THEN U=UALUECFPTRCCN0DE, J>> 
FU 5150 NEXT J 

HR 5160 UALUE cCNODE>=U i GOTO 5070 

YW 5180 U=0 

AJ 6185 FOR J=l TO 5 

SN 5190 IF UALUE CFPTRCCNODE, J>J=-1 THEN P 

OP :GOTO 5230 
EK 5208 U=U+PROB CFPTRCCNODE, J> > *U ALUE cFPT 

RcCNODE, J>> 
FL 6218 NEXT J 

HH 5228 UALUEcCNODE>=U:GOTO 5878 
FG 5238 NEXT I 

GT 6248 PRINT ttl ; "So 1 ued . " : G05UB 28848 
RH 5258 GOTO 18848 

XD 6888 REM PRINT THE TREE SECTION 
NY 6884 TRAP 688 

FE 6818 PRINT ttl ; "Output to: ";:INPUT ttl, 

RESPONSES - GOSUB 28858 
TO 6828 CLOSE »2 : OPEN »2 , 8 , 8 , RESPONSES : GO 

SUB 60 

YF 6030 FOR 1=1 TO TOP-1 

ZH 6040 PRINT tt2;"Node tt ";I;" " ; LABELS c 

28*cl-l>+l,20*I> 
LS 6050 EX = NT YPE CD * ON EX GOTO 6060,6130, 

6280 

LU 6060 ? tt2;" Decision Uaiue= ";UALU 
Ecu 

ZY 6070 ? «2;" FroH node « ";BPTRcl>; 

UB 6075 IF BPTRCUO0 THEN PRINT «2 ; " "; 
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LABELS C20*CBPTRCI> - 1> +1 , 20*BPTR cl> > ; 
ZZ 6077 ? «2 
ZO 60B0 FOR J=l TO 5 
AO 6090 IF FPTRcI,Jj=0 THEN 6110 
CZ 6100 PRINT «2;" To node » ";FPTRci,J>; 

M "i LABEL* C20* CFPTR cl, J> -li+l, 20*FPTR 

cl, JJ J 
FK 6110 NEXT J 
YR 6120 PRINT «2:G0T0 6220 

OB 6130 PRINT «2 ; " Chance Uaiue= "; 

UALUE CU 

MS 6140 PRINT «2 ; FroM node tt ";BPTRcU; 
" "; LABELS c20*cBPTRcU - U+ l, 20«BPTR cl 

ZH 6160 FOR J=l TO 5 

HU 6160 IF FPTRcI,J>=0 THEN 6180 

GT 6170 PRINT «2 ; " To node « ";FPTRcl,j>; 
M ProbJ ";PROBcFPTRcl, J>j ;" " ; LABELS c2 
0*cFPTRcI,J> -U+1,20*FPTRCI, JJ) 

GF 6180 NEXT J 

ZM 6190 PRINT tt2:G0T0 6220 

QR 6200 ? tt2;" Teminal Uaiue= ";UALU 
E CU 

RH 6210 ? «2;" Ftoh node « ";BPTRcU;" 

;LABELSC20«CBPTRCU-U+1, 20*BPTR (D > 
FE 6220 NEXT I 

RY 6230 CLOSE tt2*G0SUB 20848 

RF 6248 GOTO 18040 

NZ 10000 REM INITIALIZE SECTION 

KM 10010 DIM FPTR C208, 53 , BPTR C200> , UALUE c 

200>,NTYPEC200>,PROBC200> 
XA 10020 DIM LABELS C4000> , RESPONSES c20> ,5 

PACES C203 , TEMPS <22> 
FD 10025 UALUEC0>=0:PROBC0>=0 
FA 10030 SPACES = " M s RE 

M 20 SPACES 
RU 10035 FOR 1=1 TO 200 : NT YPE (D =0 : NE XT I 

•REM INIT NT YPE 
OD 10040 GRAPHICS 0 J CLOSE ttl*OPEN 01,4,0, 

"E:":G05UB 60 
UZ 10041 REM OPEN SCREEN FOR I'O 
CY 10050 PRINT ttl;"Decision Analysis Prog 

ran" ' PRINT ttl i PRINT «1; "Options s " 
RU 10055 TRAP 500 

LE 10060 PRINT »1;"0 - Exit"? PRINT ttl;"l 
- New Tree" ' PRINT «i;"2 - Recover Tree 

RI 10070 PRINT tti;"3 - Save Tree" * PRINT « 
1; M 4 - Edit Tree" * PRINT «i;"5 - Solve 
Tree" 

DX 10080 PRINT tti;"6 - Print Tree" * PRINT 
ttl 

NB 10085 POSITION 2,11'PRINT »l;"OPtion> 

"; » INPUT ttl, OPT 
BC 10090 IF OPT < 0 OR 0PT>6 THEN 10040 
FK 10100 IF OPT=0 THEN 20000 
SA 10110 ? ttUON OPT GOTO 1000,2000,3000, 

4000, 5000, 6000 
HL 20000 POSITION 2,13?? ttl:? ttl;"Are you 
sure you want to exit? c Y'N* " ; * INPUT 

ttl, RESPONSES 
NO 20010 IF RESPONSES="Y" THEN GRAPHICS 0 

s END 

BR 20020 IF RESPONSES="N" THEN 10040 
UF 20030 GOTO 20000 

CB 20040 FOR 1=1 TO 150*NEXT I » RETURN 

CB 20050 IF LENCRESPONSES* >1 THEN IF RE5P 

0N5E*c2,2>="«" THEN 20088 
GS 20060 IF LEN (RESPONSES* >2 THEN IF RESP 

0N5ESC3,3>="»" THEN 20080 
OG 20070 TEMPS="D» "i TEMPS c3> =RE5P0N5ES : RE 

SP0N5ES=TEMPS 
EE 20080 RETURN 
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LISTING 1 



Don't type the 
TYPO II Codes! 



DI 10 REM RECIPE MULTIPLIER 

UM 20 REM BY JAMES U. BROUN 

GL 30 REM cc> 1986, ANTIC PUBLISHING 

50 40 GRAPHICS 0:BRK=1*IF PEEK C53279> =5 T 

HEN BRK=0 
LU 50 GOTO 100 

PF 60 IF BRK THEN POKE 16,112:P0KE 53774, 

112»P0KE 77,0 
ZX 70 RETURN 

KD 100 DIM FRACC22>:REM DECIML FRACTIONS 
XY 101 DIM FRSC110>:REM STRING FRACTIONS 
QU 102 DIM T$ C51 , TA« C15> : REM INPT 5CRTCH 
TI 103 DIM E$c45),M$c30> s REM UNIT5 ABBRU 
UB 104 DIM EASC1351 ,MA*c90> : REM UNITSTXT 
WW 105 DIM EC0NC9) ,MC0NC6) :REM CONU FACT 
DE 106 DIM UC0NC2>:REM ENG TO MET U0L,MT 
MA 130 DIM I$C38>:REM INPUT ING . SCRATCH 
SG 131 DIM ING$ C1140) : REM INGREDIENTS 
IZ 132 DIM INGUNX (30) : REM ING UNITS INDX 
LO 133 DIM INGQUN c30> : REM ING QUANTITY 
AU 134 DIM RECIPES C38> * REM RECIPE NAME 
UM 135 DIM FILENAME* ci5> 

OK 137 GOSUB 60 : CLE AR=40000 : REM CLEAR TRA 
PS 

ZZ 138 NUMN0T=56 : REM » NOTES IN THEME 
JJ 140 DIM TITL$c20>,CPRT$c32>,CONc52) 
KT 142 DIM THEME (NUMNOT* , CHI c7> , CH2 c7> 
GK 200 DATA . 125 , . 25 , . 33333 , . 375 , . 5 , . 625 , 

.66667, .75, .075,1., 1.25, 1.33333 
EM 202 DATA 1 . 5 , 1 . 66667 , 1 . 75 , 2 . , 2 . 25 , 2 . 33 

333, 2. 5, 2. 66667, 2. 75, 3. 
JU 210 DATA 1/8 ,1/4 ,1/3 ,3/8 ,1/2 

,5^8 ,2/3 ,3/4 ,7/8 : REM NO QUOTS 
PX 212 DATA 1 ,1 1/4,1 1/3,1 1/2,1 2/3 

,1 3^4 

RK 214 DATA 2 ,2 1/4,2 1/3,2 1/2,2 2/3 

,2 3/4,3 * REM 

XB 220 DATA tsp . , t bsp . , f 1 . 02 , c . , pt . 

,qt. ,9ai. ,oz. ,1b. : REM ENGLISH 
LS 230 DATA Ml. , c 1 . , d l . ,1. ,g. 

,K9. : REM METRIC 
GT 240 DATA teaspoon (s) * REM 

PE 241 DATA tablespoon (s) 5 REM 
HH 242 DATA fluid ounces : REM 
ZG 243 DATA cup(s) : REM 

SF 244 DATA Pintcs) « REM 

NW 245 DATA quartcs) 1 REM 

XX 246 DATA gailon(s) : REM 

JH 247 DATA ounce cnet wt . > : REM 
JX 248 DATA Pound(s) * REM 

BW 250 DATA Milliliter cmD'.REM 
KF 251 DATA centiliter 5 REM 

YB 252 DATA deciliter s REM 

YI 253 DATA liter s REM 

XN 254 DATA gran eg or 9M.>:REM 
GF 255 DATA Kiiosran ckilo>'REM 
AG 260 DATA 1,3,6,48,96,192,768,1,16 
CM 270 DATA 1,10,100,1000,1,1000 
NE 310 DATA -32,0,0,128,160,32,0,128,-32, 

0, 0,0, 32, 128, 160, 128, 160, 0, 32, 160 
OW 311 DATA 0,128,160,32,0,128,0,32,0,128 

, 160, 32, 0, 128, 0, -32 
BR 312 DATA -32,128,160,32,128,160,-32,12 

8, 128, -32, 128, 160, 32, 128, 160, 0 
E5 314 REM NOTES FOR THEME - - 

TR 315 DATA 121,96,81,60,40,47,40,60,91,7 

2,60,45,29,35,29,45 
PI 316 DATA 243,193,162,121,81,96,81,121, 

182, 144, 121, 108, 121, 108, 91, 182 
UP 317 DATA 121,108,96,91,81,72,64,60,60, 

64, 72, 81, 91, 96, 108, 121 
SU 318 DATA 121,108,96,91,81,72,64,121 
MU 320 DATA 243,182,60,45,243,60,243 
EZ 321 DATA 193,144,47,35,193,47,193 
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PN 1000 REM MAIN PROGRAM 
SU 1010 GOSUB 1100:REM LOAD ARRAYS 
XN 1015 GOSUB 1200:REM TITL SCREEN 
UZ 1020 GOSUB 1300:REM INTRO 
AR 1025 GOSUB 1400*REM STEP 1-INP. UNITS 
ZC 1027 IF INDISK>0 THEN GOSUB 3000'GOTO 
1035 

YY 1030 GOSUB 1600«REM STEP 2 - ENTER RECP 
AH 1035 GOSUB 1500:REM STEP 3-MULTIPLIER 
WZ 1040 GOSUB 2500:REM STEP 4-OUT. UNITS 
XJ 1045 GOSUB 2600*REM STEP 5-NEW RECIPE 
XB 1050 GOSUB 2980:REM WRAPUP MENU 
XB 1055 ON WRAP GOTO 1045,1075,1080,1085, 

1020, 1065, 1070, 1095 
FF 1060 END 

NR 1065 GOSUB 3500*GOTO 1050:REM SAUE 

GS 1070 GOSUB 3100'GOTO 1050*REM PRINT 

PF 1075 GOSUB 1500-.GOTO 1045:REM CHG MULT 

, RECOMPUTE 
SX 1080 U0=3-U0:G0T0 1045 : REM CHANGE OUTP 

UT UNITS METRIC < ->ENGLISH 
US 1085 GOSUB 7000:GOTO 1050.REM CHANGE A 

N INGREDIENT 
IN 1095 GOSUB 1280:REM FINALE 
GY 1099 END 

KJ 1108 REM LOAD ARRAYS 

FB 1102 POKE 752, 1 : POSITION 10,10:? ••>••; 
RN 1105 RESTORE 200*FQR 1 = 1 TO 22 '• READ F > 

FRACcl>=F:NEXT I»? ">"; 
DF 1110 RESTORE 210:FOR 1=1 TO 22 ' READ T* 

:FR$c5*I-4>=T$iNEXT It? ••>"j 
FG 1115 RESTORE 220:FOR 1 = 1 TO 9 ' READ TS: 

E*c5**I-4J=T*sNEXT I:? ■•■>•'; 
NU 1120 RESTORE 230 i FOR 1=1 TO 6 : RE AD T*» 

MSC5*I-4J=T«:NEXT U? ••>••* 
UM 1125 RESTORE 240: FOR 1=1 TO 9 : READ TA$ 

iEA*ci5*I-14J=TA*:NEXT I:? ••>••; 
FJ 1130 RESTORE 250'FOR 1 = 1 TO 6 '• READ T A* 

iMA$ci5*I-14:>=TA$:NEXT H? ">"; 
RM 1135 RESTORE 260:FOR 1 = 1 TO 9 : RE AD F * E 

CON cli =F s NEXT H? ••>••; 
ZT 1148 RESTORE 270:FOR 1 = 1 TO 6 ' RE AD F » M 

CONcli=F:NEXT I«? 
Z5 1145 RESTORE 310:FOR 1=1 TO 52 ' READ J: 

C0NCU=J:NEXT I»? ">"; 
HD 1150 RESTORE 315:F0R 1=1 TO NUMNOT^REA 

D J:THEMECU=J:NEXT H? ••>••! 
AY 1155 RESTORE 320:FOR 1=1 TO 7 : RE AD J:C 

H1CI>=J:NEXT I:? ••>'•; 
DK 1157 RESTORE 32HF0R 1 = 1 TO 7 : RE AD J»C 

H2cl>=J:NEXT I:? ••>••; 
EN 1160 UCONC0>=1:ECONC0>=1:MCONC0>=1 
XZ 1165 UC0Ncu=943.6/192s REM ML' TSP 
UH 1170 UC0NC2»=454/16:REM G/OZ 
UI 1175 FILENAME$ = "P!":? ••>•• 
YD 1180 GOSUB 60 

LT 1185 TITL$=" RECIPE MULTIPLIER" 

FU 1190 CPRT$=" ANTIC MAGAZINE JAMES U. 

BROUN " 
CM 1199 RETURN 
PZ 1200 REM TITLE PAGE 
BM 1220 GRAPHICS 18 ' R0W=2 ' GOSUB 60 
YO 1230 FOR 1=1 TO 20sCOL=I+4 
HL 1235 IF I>10 THEN COL=COL - 10 : R0U=4 
FP 1240 COLOR A5C cTITLS (D > +CON (D 
TZ 1245 PLOT COL , ROW 
FI 1250 NEXT I 
FU 1255 R0U=8 

XY 1260 FOR 1=1 TO 32:CQL=I+1 

Z5 1265 IF I>16 THEN C0L=C0L-16 : ROU=10 

AZ 1270 COLOR A5C cCPRT* (I) J +CON cl+20) 

UI 1275 PLOT COL, ROW 

GU 1278 NEXT I 
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LE 1268 FOR C=l TO NUMNOT 
ZK 1281 I=INT c cC+7) '8> 
NX 1282 SOUND 8 , THEME cC> , 1 0 , 8 
TL 1283 SOUND 1 , CHI d > , 18 , 8 : SOUND 2,CH2cI 
> ,10,8 

FX 1285 SETCOLOR 8 , C , 8 : SETCOLOR 1,C+2*8:S 

ETCOLOR 2,C+4,8:SETC0L0R 3,C+6,8 
RX 1290 FOR D=l TO 16«NEXT D 
EA 1295 NEXT C 

AO 1298 FOR 1 = 0 TO 2 : SOUND I,0,0,0:NEXT I 
CO 1299 RETURN 

RK 1300 GRAPHICS 8 ' POKE 752,1:GQSUB 60:RE 
M INTRO 

FW 1305 ? "PRECIPE MULTIPLIER helps you i 
ncrease":? "or decrease your favorite 
recipes." 

CC 1310 ? »? "Here are the steps:":? 
JO 1315 ? "1. Decide whether the original 
rec i pe" 

DG 1316 ? " uses English or Metric unit 
s.":? 

PR 1320 ? "2. Enter the recipe into the c 
OMPuter " 

LN 1321 ? " (Enter up to 30 ingredients 

. 3 •• : ? 

TN 1325 ? "3. Decide by how Much you want 
to" 

MB 1326 ? " increase or decrease the re 
c i pe . " : ? 

5P 1330 ? "4. Decide whether you want the 
new" 

YM 1331 ? " version in English or Metri 
c . " t ? 

HU 1335 ? "5. The coMPUter will give you 
the new" 

TO 1336 ? " recipe quantities. Jot then 
down" 

UA 1337 ? " in the Margin of your cookb 
ook . " s ? 

ZC 1348 PRT=0:CLO5E »3 : 51=0 : INDI5K=0 

BP 1345 GOSUB 8010 

RI 1355 ? "^PRELIMINARIES" : ? 

UJ 1360 ? "Before beginning, you will fin 

d it"*? "helpful to exaMine your recip 

e to" 

GE 1365 ? "find ALL the ingredients. Most 
cook-":? "books are careful to list a 
11 the" 

GD 1370 ? "ingredients in one place. Howe 
ver,":? "soMetiMes you will find a few 
hiding** 

KG 1376 ? "down in the cooking instructio 
ns . " 

AH 1380 ? :? "When you have found ail the 
inflre-"'? "dients, nark each one with 
a nuMber," 

HD 1306 ? "starting with 1. This will hei 
p you 1 *:? "keep track of where you are. 
••:? 

Ill 1399 GOSUB 8018:RETURN 

IN 1400 REM INPUT UNITS 

XQ 1405 ? "H5ELECT INPUT UNITS":? 

ME 1410 ? "If your original recipe is in** 

HS 1415 ? "U.S. cENGLISH* units, en 
ter ■[!■*".? 

BK 1420 ? "If it is in METRIC units, en 
ter ■(»'*:? 

KB 1422 ? "To load a recipe froM DISK, en 
ter HOB" : ? 

UL 1425 ? "If you need HELP to decide, en 
ter fllilfl" : ? 

MY 1430 ? -(Enter only one letter.)"'.? 
UU 1435 ? "Always press WUHmmui after ever 

y entry.'* 
flU 1440 GOSUB 8180 

TN 1445 IF T$="E" THEN UI=l:RETURN 
XU 1450 IF T*="M" THEN UI=2«RETURN 
F5 1455 IF T*="D" THEN INDI5K=1 : RETURN 
DR 1460 IF T*0*'H" THEN GOSUB 8030:GOTO 1 
400 

KC 1470 REM HELP FOR ENGLISH'METRIC'DISK 
UP 1472 ? "*If your recipe contains thing 

s like"*? "cups, ounces, pounds, or te 

aspoons , '* 
RA 1474 ? "it is ENGLISH.":? 
LQ 1476 ? "If it contains things like sra 

ms,":? "kiiograMS (kilos). Milliliters 
(mi J , " 

UY 1478 ? "liters, it is METRIC**:? 
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KU 1480 ? "If there are soMe of each, tak 
e your":? "cookbook back to the books! 
ore for a** 

XD 1482 ? "refund. The recipes are proba 

biv*:? "no good anyway.":? 
MC 1484 ? "If you have previously used th 

is**:? "prosran to save a recipe to dis 

k, " 

LU 1486 ? "you can read it back and work 

on it.":? 
WF 1490 GOSUB 8010:GOTO 1400 
HQ 1500 REM MULTIPLIER 

CC 1506 ? "KCHOOSE MULTIPLIER" * ? 

AC 1507 ? "Here you Must decide how Much 

you":? "want to increase or decrease y 

our" 

QU 1508 ? "recipe by. For exaMPie, if yo 
u want".? "to double it, the MUltiPlie 
r is 2 . " i ? 

HT 1510 ? "There are two ways to choose t 

he" : ? "MUl tiPl ier : " : ? 
MT 1515 ? "Enter BdlB if you know what mui 

tipiier**:? ** you want, or":? 

GD 1520 ? "Enter BI3B if you know how Many 

" : ? " servings you want.":? 

BM 1525 GOSUB 8100 
LF 1626 IF T$="M" THEN 1550 

LU 1527 IF T*<>"5" THEN GOSUB 8030:GOTO 1 
500 

ZU 1530 REM BY SERUINGS 

TB 1532 S2=l:IF S1>0 THEN 1540 

QC 1534 Sl=l 

PC 1535 ? •'«":? :? "How Many servings doe 

s your":? "original recipe Make"; 
SQ 1537 TRAP 1590:INPUT Sl:TRAP CLEAR 
CN 1538 IF SKI THEN ? "PLEASE ENTER A NU 
MBER AT LEAST 1 .": GOSUB 8030:GOTO 1530 

GY 1540 ? :? "How Many servings do you wa 

nt"«? "to Make*' ; 
UO 1542 TRAP 1595:INPUT S2:TRAP CLEAR 
FD 1543 IF S2<1 THEN ? "PLEASE ENTER A NU 

MBER AT LEAST l.":G05UB 8030:GOTO 1540 

PL 1545 M=52'5l:G0T0 1598 
FK 1550 REM BY NUMBER 

C5 1555 ? "^Select the Multiplier you wan 
t by**:? "entering the letter in front 
Of i t : " : ? 

GA 1559 A=A5C C"A"* 

NS 1560 FOR 1=1 TO 11:15=1*5 

UZ 1562 ? CHR* Cl-1 + A> ; "- " ; F R S c I 5 - 4 , I 5 > ; " 

";CHR*ci+l8+A-,"- ";FR$(I5+51,I5 

+ 55> 
GH 1564 NEXT I 

SE 1566 ? " U-Enter as a dec 

iMai" : ? 

FM 1568 ? "Letter for selection"; :T$="?": 
GOSUB 8100 

FU 1570 IF T$> = "A" AND T$<="U" THEN M = F R A 

C CASC (TS> - A + l> : GOTO 1598 
UX 1575 IF T$<>"U" THEN GOSUB 8030:GOTO 1 

550 

QM 1580 ? "How Much do you want to":? " M u 

ltipiy the recipe by**; 
MA 1682 TRAP 1596:INPUT M : TRAP CLEAR 
ZT 1586 GOTO 1698 

JU 1590 TRAP CLE AR * GOSUB 8020:GOTO 1535 
EZ 1595 TRAP CLEAR : GOSUB 8020:GOTO 1548 
KN 1596 TRAP CLEAR : GOSUB 8828:G0T0 1568 
ST 1698 ? »? "The Multiplier is ";M:G05UB 

8000 
CU 1599 RETURN 
UL 1600 REM RECIPE 

BK 1605 PRINT "CENTER RECIPE":? 

AA 1610 ? "In this step you will enter th 

e":? "ingredients for your recipe:" 
FM 1615 ? :? "-Enter the AMOUNT of each i 

nsred i ent . " 
UJ 1617 ? :? "-Enter the UNITS it is Meas 

ur ed with.** 
UC 1620 ? :? "-Enter the NAME, so you wil 

l know'*:? what the later results Mea 

n . " 

RI 1622 ? :? "-Uerify or Modify the entry 
If you'*:? Make a Mistake, you wil 
l have a" 

LQ 1625 ? " chance to fix it before going 
on.**:? '* You will also have a chance 
to Make" 

continued on next page 
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X5 1627 ? " changes at the end, and reuie 

w the M i ? 11 results . M 
AO 1630 ? *? "There will be a separate sc 

reen to"!? "lead you through each of t 

hese steps.":? 
BS 1635 GOSUB 8018 

LI 1648 ? "«"!? :? "Each ingredient has 3 
parts--" * ? 



MY 2118 I5=INGUNX cING)*5 

TC 2112 I$=ING* clNG*38-37, ING*38) 

JL 2116 IF 16=8 THEN T * ="p i ec e" t GOTO 2136 



of:? "have units (eggs, can, etc.)." 
GG 1668 ? "When you have things like this 

,"*? "select 'piece' for the units." 
GO 1665 ? 'GOSUB 8818 i PRT=8 i ING=1 
FL 1678 REM INGREDIENT LOOP 
NO 1675 GOSUB 7100:REM ENTER ON INGRED. 
ME 1677 IF QUANGO THEN INGOING - 1 : GOTO 169 

9 

AO 1688 IF ING>=30 THEN 1699 
UX 1685 ING=ING+1 : GOTO 1678 
MI 1699 NING=ING ' RETURN 
OU 1788 REM QUANTITY 

LA 1786 ? "^QUANTITY FOR INGREDIENT ";ING 

■ ? 

SD 1718 ? "Select the quantity you want b 
V"i? "entering the letter in front of 
i t i " i ? 

EY 1714 A=A5CC"A") 

OB 1715 FOR 1 = 1 TO 1HI5 = I*S 

UJ 1728 ? CHR* CI-1 + A* ; "- " ; FR* cl5 -4 , 15) ; " 

"; CHR* Cl + 10 + A>i"- " ; FR* CI5 + 51 , 15 

+ 55) 
GD 1726 NEXT I 
RW 1730 ? " 

inai" 
LE 1735 ? " 

entry" 
UG 1740 ? " 

ients" 
EU 1750 A=ASC("A") 

DA 1766 ? »? "Letter for selection"] >G05U 
B 8100 

DD 1760 IF T*>="A" AND T*<="U" THEN QU AN= 

FRACCA5CCT«)-A+1) *G0T0 1798 
YX 1766 IF T*<>"X" THEN 1778 
YA 1766 IF ING<2 THEN ? "THERE IS NO PREU 

IOUS INGREDIENT .": GOSUB 8838:G0T0 1700 



XU 

YM 
GP 



UF 
JD 
AU 
MJ 
NC 

CY 
OZ 
01 

QC 



FJ 
UR 



W Enter as a dec 
X-Show previous 
Z-No More insred 



1768 ING=ING-1 ' GOSUB 2188:G0SUB 8818*1 
NG=ING*1 i GOTO 1788 

1778 IF T*="Z" THEN QUAN=8»G0T0 1799 
1775 IF T*<>"M" THEN ? "Please enter o 
ne of the letters above ."' GOSUB 8838tG 
0T0 1758 

1788 ? "What is the quantity"; 

TRAP 1798i INPUT QU AN * TRAP CLEAR 
GOTO 1798 

TRAP CLEAR i GOSUB 8828*G0T0 1788 
? "The quantity is " ; QU AN * GOSUB 



8 



RETURN 

REM GET UNITS 
? "CENTER UNITS 



FOR INGREDIENT 



1782 
1785 
1798 
1798 
888 
1799 
1988 
1985 
ING»? 

1918 ? "Select the Measuring unit you 
want by":? "entering the letter in fro 
nt of it*"!? 

1916 A = ASC C"A") i I2=12~3*UI « REM LOOP LI 
MIT 6 FOR METRIC, 9 FOR ENGLISH 
1928 FOR 1=1 TO 12 

1 16 = 1*16 tTA* = EA*cll6 l4,I15) 
IF UI = 2 THEN T A*=MA* CI15 - 14 , 115) 
? CHR* cl-l+A* ; "- ";TA* 
NEXT I 

? "P- Piece cor can, etc.)" 
? *? "Letter for units"; < GOSUB 81 



OU 1922 
UF 1923 
TA 1925 
FQ 1938 
MO 1948 
TU 1958 

88 
JJ 1955 
EF 1968 

INGX 
EK 1978 
BZ 1988 
EA 2188 



I2=I2*A1 

IF T*>="A" AND T*<=CHR*CI2) THEN 
= ASC (T<1 -A + l * RETURN 
IF T* = "P" THEN INGX = 8 * RETURN 
GOSUB 8030'GOTO 1988 
REM DISPLAY INGREDIENT CING) 



DF 

TN 
UA 



UX 



RI 

WO 
HL 
AZ 
AZ 
WE 
HD 



IF UI=2 THEN T*=M* CI6-4, 15) 'GOTO 



IN 


1642 


? 


"Quantity" 






NQ 


1644 


? 


" tt) 


Units" 


FS 


ZF 


1646 


? 


" Bi 


31 


Nane" 




YH 


1648 


? 






St-iRMHHHHMWH " 


CN 


OG 


1658 


? 


" 1/2 


CUP 


susar" 


XM 


UE 


1652 


? 


" 3 




eggs" 


RA 


DU 


1654 


? 


" 1/8 


tSP . 


salt" 


KI 


XF 


1656 


? 


" 1 




can condensed Mil 




NL 


K" 

1658 


? 


J? "Notice 


that so Me iteMS do n 


WW 



2128 
2135 

2138 T*=E* CI6-4. 15) 

2135 IF PRT=8 THEN ? "tt»;ING," - ";ING 
QUNCING);" ";T*;" of It 
2148 IF PRT=1 THEN PRINT *3 ; "tt" ; ING , " 
- "; INGQUNcING) ; " ";T*;" of ";I* 
2199 RETURN 

2288 REM GET INGREDIENT NAME 
2285 ? "UN AME OF INGREDIENT ";ING«? 
2218 ? "To save tiMe, you can abbrevia 
te the"i? "naMe of the ingredient. Th 
e coMPUter" 

2216 ? "does not Know the difference b 
etween"i? "an 'EGG, LIGHTLY BEATEN', a 
nd" i ? "an • EG ' . " i ? 

2228 ? "This part of the entry is Just 
to"J? "help you keep things straight. 

t ? 

2238 ? "Using one line only,":? "enter 

the ingredient --"i? 
2248 TRAP 2298 HNPUT I* * TRAP CLEAR 
2258 GOSUB 8280'RETURN 

2290 TRAP CLEAR : GOSUB 8030:GOTO 2238 

2588 REM OUTPUT UNITS 

2585 ? "^SELECT OUTPUT UNITS"*? 

2618 ? "If you want the new recipe in" 



GP 2615 ? "U.S. CENGLISH) units, ente 
r ■!«":? 

FE 2628 ? "If you want METRIC units, ente 
r «IIH" 

OQ 2525 ? 

UX 2635 ? "Always Press mianiUiMKi after ever 
y entry." 

AZ 2548 GOSUB 8100 

YS 2546 IF T* = "E" THEN UO = HRETURN 

DY 2647 IF T*="M" THEN U0=2»RETURN 

XK 2548 ? >? "PLEASE ENTER WW OR Wm»" 

ZY 2549 GOSUB 8830:GOTO 2680 

XN 2688 REM NEW RECIPE 

DB 2685 ? "«NEU RECIPE" 

PF 2686 IF NING<1 THEN ? '? "YOU HAUE NOT 
ENTERED ANY INGREDIENTS ." i GOSUB 8O30t 
GOTO 2699 

PZ 2610 ? i? "The new recipe will be disp 
laved"!? "one ingredient at a tiMe, us 
ing" 

'several different coMbinatipns 
'quantity and units. An of th 



'will be approxiMateiy equivaie 
•cYou should be aware that Most 
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KJ 2612 ? ' 
Of'i? 1 
ese" 
UX 2614 ? ■ 
nt . " » ? • 
rec i pe' 

ML 2616 ? "quantities are only approxinat 
e . ) " 

UE 2620 ? i? "Jot down the one coMbinatio 
n you"«? "feel Most comfortable with f 
or each"«? "ingredient."*? 

01 2630 GOSUB 8010 » PRT = 0 • G05UD 3288 

CX 2699 RETURN 

UT 2788 REM DISPLAY COMBINATIONS OF UNITS 

CI 2785 IF PRT=8 THEN ? "QUANTITY UN 

ITS"i ? 

IU 2718 INDX=INGUNX CING) 

DU 2712 QUAN=INGQUNclNG)«M 

BU 2714 IXWT = 11-3*UH0XWT = 11-3«U0 

FR 2716 ULWT=1«IF INDX>=IXMT THEN ULWT=2 

JO 2728 IF INDX=8 THEN ULWT=8 

SA 2726 IF UI=1 THEN QU AN=QU AN^ECON CINDX) 

BS 2728 IF UI=2 THEN QU AN=QU AN^MCON CINDX) 

IA 2738 ON UI-UO+2 GOTO 2732,2738,2734 

DR 2732 QUAN=QUAN*UCONcULUT) « GOTO 2738 

UQ 2734 QUAN=QUAN/UCONcULUT) 

UA 2738 REM QUAN IN OUTPUT BASE UNITS 

UT 2748 ON ULWT+1 GOTO 2742,2744,2746 

BZ 2742 11=8 i 12=8 i GOTO 2748 

ZZ 2744 11=1 i I2=0XUT-1 « GOTO 2748 

DR 2746 I1=0XWT » 12=11+1 

HM 2748 REM 11,12 UNITS LIMITS 

YH 2749 N=8 

KL 2768 FOR UNDX=I1 TO 12 

SI 2752 IF U0=1 THEN Q2=QU AN/ ECON CUNDX) 

BG 2753 IF U0=2 THEN Q2=QU AN/MCON cUNDX ) 
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SX 2755 IF 02>8.85 THEN 2768 

DJ 2756 IF UNDX=I1 AND PRT = 8 THEN ? "Tiny 

Pine h" : GOTO 2795 
AI 2757 IF UNDX=I1 THEN PRINT t*3;" Tiny p 

inch" 
ZU 2758 GOTO 2795 

MA 2768 IF 02 > c985*U0- 978> AND UNDX<I2 TH 
EN 2795 

BC 2765 GOSUB 2888:REM FIND CLOSEST FRAC 
01 2778 IF PRT = 1 THEN PRINT «3 ; ";TS," 
t* • 

MM 2772 IF PRT = 8 THEN ? ";TS," M t 

JW 2775 I5=UNDX*5:I15=I5*3:N=N+1 
GD 2788 IF UNDX=8 THEN TS = »p i ec e" « TA$="" i 
GOTO 2798 

UR 2782 IF U0 = 1 THEN TS = ES cl5 4 , 15 > : T AS = E 

A$cI15-14,I15> 
OX 2784 IF U0=2 THEN T$ = MS cl5 -4 , 15 > I T AS = M 

AScll5-14,I15* 
NM 2798 IF PRT = 1 THEN PRINT «3 ; T $;"--"; T A 

S 

KU 2792 IF PRT = 8 THEN ? TS TAS 

ZL 2795 NEXT UNDX 

GU 2797 IF PRT=8 THEN ? 

XU 2798 IF PRT = 1 THEN PRINT «3 

CZ 2799 RETURN 

LI 2888 REM TS = CLOSEST FRAC TO 02 

CH 2885 DIFMIN=5 : BE5T=8 : T$="Pinch" 

RP 2887 IF U0 = 2 THEN IS=STRS clNT C188*Q2*8 

. 5>'188>:G0SUB 8288:TS = ISci,5:i:RETURN 
GE 2818 IF Q2>8.85 AND Q2 < 8 . 8*FR AC c l > THE 

N T$="1'16 M 
NR 2815 IF Q2<8 . 8*FRAC CD THEN 2899 
NE 2828 IF 02 > 1 . 1*FRAC c22> THEN 2888 
GJ 2825 FOR 1=1 TO 22 
WE 2838 DIFQ=ABS CQ2FRAC CIJ J 

CH 2848 IF DIFO < DIFMIN THEN DIFMIN = DIFQ : B 

E5T = I 
GM 2845 NEXT I 

EU 2858 IF BEST>8 AND DIFMIN<8.3 THEN 15= 

BEST*5 :T$=FRScl5-4,I5> 
BM 2878 GOTO 2899 

CF 2888 REM HANDLE BIGGER STUFF 

UD 2885 IF Q2>9.6 THEN TS=5TRS clNT CQ2+8 . 5 

i J :GOTO 2899 
ZU 2898 TS=5TR$ ClNT C4*Q2> '4* 
DB 2699 RETURN 
PT 2988 REM WRAPUP 
PD 2985 ? "WALL FINISHED":? 
YP 2918 ? ••What do you want to do next?" 
UL 2915 ? i? "A- Show the new recipe aoai 

n . M 

UE 2928 ? i 

conpute . 
ZQ 2925 ? I 

oh M 
ET 2927 TAS 
DA 2928 IF 

LI5H" 
GZ 2938 ? " 
DO 2935 ? : 
FE 2948 ? ■ 

cipe." 
UE 2945 ? i 
RP 2958 ? : 
HI 2955 ? t 



? •* B - Change Multiplier and re 

? "C- Chanse the new recipe fr 

= "ENGLISH" : I$="METRIC" 

U0>1 THEN TA«="METRIC" « I$="ENG 

";TAS;" to ";IS;"." 
? "D- Change an ingredient." 
? "E- Start over with a new re 

? "F- Save recipe to disk." 

? "G- Print recipe." 

? "H- Get back to the Kitchen. 



CO 2968 ? :? "Letter for selection"; sGOSU 

B 8188 
FW 2965 A=A5Cc»A"> 

GF 2978 IF T$>="A" AND TS<="H" THEN MR AP= 

A5C CT$> - A + l i GOTO 2999 
DT 2995 GOSUB 8838:G0T0 2988 
DD 2999 RETURN 

QF 3888 REM READ A RECIPE FROM DISK 
UG 3885 I0C0DE=4 : GOSUB 4888 
NU 3818 IF I0C0DE=8 THEN 3898 
QE 3815 TRAP 3878 

FQ 3828 INPUT »3/ UI * SI* NING * RECIPES 
UL 3825 TRAP CLEAR 

UE 3827 ? "Reading recipe:":? RECIPES:? 
FT 3838 FOR ING=1 TO NING 

UR 3835 TRAP 3878:INPUT t*3, QU AN * UNDX* IS 

OF 3848 TRAP CLE AR : GOSUB 68 

PQ 3845 INGQUNCING>=QUAN 

ZV 3858 INGUNX <ING>=UNDX 

QC 3855 INGS <ING*38-37, ING*38> =1$ 

YW 3868 NEXT ING 

BR 3865 GOSUB 8818 

GF 3869 CLOSE «3 : RETURN 



UG 3878 TRAP CLEAR 

5R 3875 ? :? "FILE READ ERROR. THE FILE 
MAY NOT" 

JB 3888 ? "BE A RECIPE MULTIPLIER FILE." 

C5 3898 NING=8 : Sl=8 : RECIPE$="" 

DH 3895 CLOSE »3:G05UB 8838 

CM 3899 RETURN 

NN 3188 REM PRINT RECIPE 

PI 3185 GOSUB 3788:IF NING=8 THEN 3199 

AP 3118 CLOSE «3:TRAP 3198 » FILENAME$ = "P : " 

SH 3115 ? :? "POSITION PAPER TO TOP OF FO 

RM.":G05UB 8818 
BI 3128 OPEN «3, 8, 8, "P : " J TRAP CLEAR: GOSUB 
68 

SI 3125 PRINT »3:PRINT »3 
EM 3138 PRINT »3; RECIPES : PRINT »3 
IZ 3135 PRINT «3;"0riainai naKes ";S1;" s 
e r v i n g s • " 

MI 3148 PRINT «3i "Conversion naKes ";M*51 

... servings." 
UQ 3188 PRT=l:GOSUB 3288 : PRT=8 s CLOSE «3 i G 

OSUB 68 : RETURN 
IS 3198 TRAP CLEAR : I0C0DE=8 : GOSUB 8388 
NT 3195 IF I0C0DE=8 THEN 3118 
CO 3199 RETURN 

JJ 3288 REM CONUERTED RECIPE 

FR 3218 FOR ING=1 TO NING 

TF 3212 IS=INGS clNG*38-37, ING*38* 

GJ 3215 IF PRT=8 THEN ? "^INGREDIENT ";IN 

G:? :? 1$:? :GOTO 3235 
GE 3228 PRINT «3: PRINT «3;' INGRED 

IENT ";ING;" " 

XX 3238 PRINT «3;I$:PRINT »3 
EQ 3235 I15=INGUNX cINGJ*15 

BC 3248 IF 115=8 THEN T A$="p i ec e" : GOTO 32 
55 

MT 3245 IF UI = 1 THEN TA$ = E A$ CI15 - 14 , 115* 
TP 3258 IF UI>1 THEN T A$ = MA$ ell 5 - 14 . 1 15» 
HZ 3255 IF PRT=8 THEN ? ING QUN c ING > ; " ";T 

AS:? •• Multiplied by ";M:? " con 

verts to any of:":? :GOTO 3288 
IK 3268 PRINT «3; INGQUN (ING) ; " ";TA$;" MU 

l tip lied by ";M;" converts to any of:" 

:PRINT »3 

GJ 3288 GOSUB 2788:IF PRT=8 THEN G05UB 88 
18 

ZJ 3298 NEXT ING 
CQ 3299 RETURN 

NJ 3588 REM WRITE RECIPE TO DISK 

MG 3582 GOSUB 3788:IF NING=8 THEN RETURN 

XQ 3585 I0C0DE = 8 : GOSUB 4888 

HD 3518 IF I0C0DE=8 THEN RETURN 

TJ 3515 TRAP 3588 

LH 3528 PRINT «3; UI; %% , "; 51 ; "> "; NING; ", "; R 
ECIPES 

GD 3538 FOR ING=1 TO NING 

RS 3548 PRINT »3 ; INGQUN clNGi ;","; INGUNX cl 

NG >;","; ING S clNG**38-37> ING*383 
ZG 3568 NEXT ING 

TK 3578 TRAP CLEAR : CLOSE »3:G05UB 68:RETU 
RN 

EZ 3588 TRAP CLEAR : CLOSE «3:G05UB 68 

KW 3585 ? :? "FILE WRITE ERROR. CODE ";P 

EEKC195J 
IU 3598 GOSUB 8838:RETURN 

OU 3788 REM CHECK RECIPE READY 
WE 3785 IF NING>8 THEN 3728 

YY 3718 ? :? "NO RECIPE IN MEMORY. YOU M 
UST ENTER" 

BN 3712 ? "A RECIPE BEFORE YOU CAN SPUE 0 

R PRINT IT" 
IU 3715 GOSUB 8838:RETURN 
10 3728 IF UI=1 OR UI=2 THEN 3748 
WK 3725 ? :? "YOU MUST SPECIFY WHETHER TH 

E RECIPE" 

FJ 3727 ? "IS IN ENGLISH OR METRIC UNITS • 
« • 

KX 3738 GOSUB 8838:G0SUB 1488 
DL 3748 IF 51>8 THEN 3768 
QD 3742 Sl=l 

PL 3745 ? ••«":? :? "How Many servings doe 

s your":? "original recipe nake"; 
TH 3758 TRAP 3788.INPUT SI : TRAP CLEAR 
WO 3755 IF 5K1 THEN ? "PLEASE ENTER A NU 
MBER AT LEAST 1 .": GOSUB 8838:G0T0 3742 

TO 3768 IF LENCRECIPESJ >8 THEN RETURN 
XN 3762 ? "KUsing one line oni«* n «? "ente 
r the nane of this recipe:" 

continued on next pase 
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AS 3765 TRAP 3798HNPUT I$:TRAP CLEAR 
PG 3770 GOSUB 8208 i RECIPE$=I* i RETURN 
QK 3788 TRAP CLEAR J GOSUB 8820:GOTO 3745 
NG 3798 TRAP CLE AR : GOSUB 8838'GOTO 3768 
ZG 4888 REM OPEN DISK FILE 
IT 4818 ? "«FILE SELECTION" * ? 

"Enter a file nane up to 8 char 
•'? "long, with an optional exte 



'Include the disk drive nunber • 
•For exaMPie: Dl : BEEF5TEW . REC" 



FT 4828 ? 
acters' 
nder . H 
LJ 4838 ? 

•• : ? t ? 
I ? 

EC 4848 ? "File nane" INPUT FILENAMES ' IF 

LEN (FILENAMES <3 THEN 4818 
US 4858 TRAP 4898:CL0SE «3 

ZU 4868 CLOSE »3:0PEN »3 , IOCODE , 8 , FI LENAM 
Ef 

VX 4878 TRAP CLEAR-* GOSUB 68 * RETURN 
IK 4898 TRAP CLEAR 'CL05E »3:G05UB 8388 
UI 4898 IF I0C0DEO8 THEN 4848 
CN 4899 RETURN 

ZF 7888 REM CHANGE AN INGREDIENT 

JW 7885 ? "* n INGREDIENT".? 

CH 7818 IF NING=8 THEN ? "THERE ARE NO IN 

GREDIENTS .": GOSUB 8838'RETURN 
UA 7828 FOR 1=1 TO NING 

JA 7838 ? I;"- "; ING$ (I*38-37# 1*38-5* 
FY 7835 NEXT I 

UK 7048 ? NING+l;"- Add another ingredien 
t" 

UE 7858 ? t? "What is the nunber of the i 
ngredient"'? "you want to change"; 

ZY 7868 TRAP 7090 * INPUT ING '• TRAP CLEAR 

YR 7065 IF ING<1 OR INONING + 1 THEN ? "Pi 
ease enter a nunber fron the list. "'GO 
SUB 8030'GOTO 7000 

CY 7070 IF ING=NING+1 THEN NING - ING 

GM 7080 GOSUB 7100:RETURN 

ZT 7090 TRAP CLEAR * GOSUB 8020 t GOTO 7000 

BD 7100 REM ENTER INGREDIENT *ING 

AA 7110 GOSUB 1700'IF QUAN=8 THEN 7199 

OM 7120 INGQUN€INGJ=QUAN 

XC 7130 GOSUB 1900 t INGUNX (ING> =INGX 

ZG 7135 GOSUB 2200 

OF 7145 ING*CING*38~37,ING*38>=I$ 
NJ 7160 ? "^INGREDIENT ";ING«? 
YZ 7155 GOSUB 2100 

TW 7160 POKE 752,0:? :? "Enter Mi'M if OK, 
or" 

DF 7165 ? :? "Enter W» to change." 

DR 7170 ? i? "OK *<-"; 'GOSUB 8100 

CJ 7172 IF NOT CT*="Y" OR T*="N"> THEN ? 

+ + : GOTO 7160 

SO 7175 IF T$<>"Y" THEN 7100 



XE 7199 POKE 752,l:RETURN 

IB 8000 REM DELAY 

HG 8001 5ETC0L0R 4,12,8'REM GREEN BORDER 

IE 8882 FOR K=l TO 16 

PK 8883 SOUND 0 , THEME (K> , 1 0 , 4 

PU 8004 FOR D=l TO 4*NEXT D 

GM 8005 NEXT K 

YY 8007 SETCOLOR 4,0,0'SOUND 0,8,0,8 

BQ 8889 RETURN 

HH 8810 REM WAIT FOR RETURN 

GX 8811 SETCOLOR 4,8,18:REM BLUE BORDER 

DM 8812 ? "Press ■GHUHMHin when ready--" 

TK 8814 INPUT «16 , T$ i SETCOLOR 4,0,8 

PP 8819 GOSUB 68 s RETURN 

JU 8828 REM NUMERIC ERROR 

XF 8825 ? "Please enter a decinai nunber. 

NZ 8838 REM ANY ERROR 

JX 8835 SETCOLOR 4,4,6'REM RED BORDER 

BN 8840 FOR K=l TO 8 

DU 8845 SOUND 0 , 1 3 6 + 1 8*K , 1 8 , 8 

SK 8858 FOR D=l TO 8*NEXT D 

HB 8855 NEXT K 

YO 8868 SETCOLOR 4,8,8:S0UND 8,8,8,8 

CR 8899 RETURN 

WR 8188 REM INPUT LETTER TO T$ 

JE 8118 TRAP 8190'POKE 782,64'REM FORCE C 
APS 

ID 8115 POKE 694,8'REM CLEAR INUERSE FLAG 

EN 8117 POKE 752,8'INPUT T$ t TRAP CLEAR 

EI 8128 IF LENCT$X>1 THEN 8198 

CR 8138 T = A5C CT$) : IF T>128 THEN T = T-128»T 

«=CHRS CT> i REM CLEAR INUERSE UIDEO 
RM 8148 IF T$>="A" AND T$<="Z" THEN 8199 
DJ 8198 TRAP CLEAR'? "Please enter a sing 

le letter .": GOSUB 8838 
SH 8196 GOTO 8180 

WH 8199 SETCOLOR 4,8,8'POKE 752 , 1 : RETURN 

UY 8288 REM EXTEND 1$ WIT H BLANKS 

ZK 8218 ILEN=LENcI$J+l 

GT 8228 IF ILEN>38 THEN RETURN 

HH 8238 I$cILEN>=" "*GOTO 8218 

OG 8388 REM OPEN ERROR 

LJ 8318 ? *? "FILE OPEN ERROR. CHECK DEU 

ICE ";FILENAME$ci,2> 
SG 8328 ? "ERROR CODE IS ' 
CB 8338 GOSUB 8838 
AM 8348 ? :? "To abandon, 
QJ 8358 ? J? "To retry, 
EC 8368 GOSUB 8180:IF T« = « 

0 

CX 8399 RETURN 



•; PEEKC195J 

enter ■GIB" 
enter ■(:«" 
'A" THEN IOCODE= 



forecast the weather with your Atari 

WEATHER WIZARD 



Article on page 19 



LISTING 1 
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FU 2 REM WEATHER WIZARD 

PD 4 REM BY RICHARD STAERZL 

FU 6 REM (ci 1986, ANTIC PUBLISHING 

JZ 8 BRK=l:IF PEEK (53279* =5 THEN BRK= 8 

RZ 9 DIM W$ (2> , 5$ ci> , FS (1?J , T$ (63 

ZU 18 GRAPHICS 2*C0L0R 4:SETC0L0R 4,9,4:P 

OKE 752,l:G0SUB 918 
AQ 15 SEN50RS=8 

KH 16 MTEMP=-1 . 38461638 : BTEMP=127 . 115384 

EJ 17 MHUM=-8 .438596491 t BHUM=188 . 5 

PD 28 ? »6;" "*? »6;" "«? »6;" " : ? »6 ; " " 

t? «6;" ":? «6;" WEATHER WIZARD" 
OS 31 ? " BY DICK STAERZL" 

IM 33 ? :? " (O 1986, Antic Publishi 
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n9"*FOR X=l TO 1888:NEXT X 
RI 48 GOSUB 988 

5Q 58 ? «6:? »6 ; " LAST BAROMETER RE AD " ' GO 
SUB 3888 

KZ 68 TRAP 4320:INPUT A : TRAP 48888.GQSUB 

4388 
RL 78 GOSUB 988 

FT 88 ? »6:? «6 ; " PRESENT BAROMETER" : G05 
UB 3888 

NU 98 TRAP 4428:INPUT B : TRAP 48888:G05UB 
4488 

TW 188 GOSUB 988 

PF 118 ? »6:? «6;" TIME ELASPED :H0UR5":G 
OSUB 3188 

JUNE 1986 



RM 120 TRAP 4200:INPUT T*TRAP 40000'GOSUB 
5000 

UC 130 GOSUB 900 

US 140 ? »6;" WIND DIRECTION" * ? *6*G0SU 
B 3200 

RJ 150 INPUT U$:G05UB 4000 
UI 160 GOSUB 900 

OB 170 ? «6s? «6;" SKY CONDITION IS*":? 

«6 : ? »6 i ? »6 : ? »6 
SU 180 ? »6 : ? «6;" CLEAR c C > " 

JO 190 ? «6:? »6;" PARTLY CLOUDY c P > 
NO 200 ? «6:? »6i" MOSTLY CLOUDY c M > 
WD 210 ? «6s? «6;" OUERC AST c 0 I" 

JU 220 ? »6i? »6;" RAIN c R > •• 

QW 225 INPUT 5* s GOSUB 4100 
SU 230 R= cB- A» 'T*100 * B= c30 . 3~BJ*100 
ZR 240 IF R>=1 . 6 AND R<=1.6 THEN D = 0 
EO 250 IF R>1.6 AND R<2.6 THEN D=-10 
FP 260 IF R>=26 THEN D=-20 
BM 270 IF R>-2.6 AND R<-16 THEN D=10 
KW 280 IF R<=-26 THEN D = 20 
WT 290 IF B>90 THEN B = 90 
ME 300 IF B<10 THEN B = 10 

ON 310 C=B+D+SsIF C>90 THEN C = 90HF C<10 

THEN C = 10 
NI 320 IF C<10 THEN C = 10 
IL 330 IF 5=40 THEN C = 100 
AA 340 IF C<50 THEN F« = " FAIR" 
UW 350 IF C>30 AND C<70 THEN F$ = " UNSETTL 

ED" 

IF 360 IF C>50 AND C<100 THEN F$ = " RAIN 

SQ 370 IF C = 100 AND D>0 THEN F$="RAIN END 

ING 12 HR" 

UX 380 IF C=100 AND D<0 THEN F$="RAIN END 

ING 6 HR" 

XC 390 IF C=100 AND D = 0 THEN F$="RAIN END 

ING 24 HR" 

XL 400 IF W>5 THEN T$="COLDER" i T = 9 

BW 410 IF W<2 THEN T$ = " C0LD":T=8 

10 420 IF W>1 AND W<4 THEN T$="WARMER" * T= 

4 

HB 430 IF W>3 AND W<6 THEN T$ = " WARM" : T = 3 

XG 500 GRAPHICS 7:SETC0L0R 0,T,4:COLOR U 
SETCOLOR 1,0,4:COLOR 2:SETC0L0R 2,1/12 
•COLOR 3:G0SUB 910 

TS 510 GOSUB 3500 

ER 520 IF C<70 THEN GOSUB 3600 

BA 530 IF C>30 THEN GOSUB 3300 

MJ 540 GOSUB 3850:POKE 752,1 

DH 550 ? "■HHliimHBHdriM^ 



PO 560 IF NOT CSENSORSJ THEN ? " " 
XW 570 ? T$,C,F$ 

KE 571 IF c SENSORS* THEN ? " TEMP = ";INTcM 

TEMP*PEEKC624>+BTEMP> , , 
YA 572 IF C5ENS0RSJ THEN ? "HUM=" ; INT CMHU 

M*PEEKC625>+BHUM> 
UP 575 GOSUB 31000 

GW 576 ? "Press ■HfJfflfflril to run again."; 
ER 580 IF PEEKCS3279* <>6 THEN 680 
PY 590 GOTO 10 

PR 900 GRAPHICS l'SETCQLOR 4,8,0»COLOR 0< 
SETCOLOR 2,0,0:COLOR 3*P0KE 752,liG05U 
B 910 s RETURN 

TU 910 IF BRK THEN POKE 16,112'POKE 63774 
,112»P0KE 77,0«POKE 702,64 

7 I Q9ft DFTIIPM 

: ? «6 

30" »? «6 
: ? t*6 

31" *? «6 



1 2":? « 

. •• : ? »6 
3"s? «6 

. s ? tt6 



CB 


3000 


? «6«? 


«6«? 


«6; " 


OB 


3810 


? »6:? 


«6; " 


29 


LD 


3020 


? «6s? 


«6; " 


M 


00 


3030 


? «6:? 


«6> 


28 


PY 


3040 


? «6 i ? 


»6; 




AO 


3050 


RETURN 






GE 


3100 


? «6 : ? 


«6:? 


»6; " 


SL 


6 

3110 


? «6s? 


»6; " 




IZ 


3120 


? «6:? 


«6; " 


9 


SR 


3130 


? «6«? 


»6; " 




CM 


3140 


? »6 : ? 


«6; " 




AS 


3150 


RETURN 






CE 


3200 


? «6:? 


«6; " 




KF 


3210 


? «6 * ? 


«6; " 


M 


EP 


3220 


? »6 : ? 


«6; " 


w 


KL 


3230 


? «6»? 


«6; " 
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N"*? »6 

s ? »6 
? E":? »6 

i ? «6 



UT 3240 ? «6:? «6 ; " 5" •• RET URN 

NB 3300 REM .STORM CLOUD 

UP 3305 COLOR 2 ' REM GRAY 

OU 3310 R=12 

TG 3320 FOR X = -R TO R STEP 1 

XU 3330 Y=SQR cR*R-X*X> 

EP 3340 PLOT 115+X , 15 + Y ' DRAWTO 115+X,15Y 

ZO 3350 PLOT 135+X,20+Y:DRAWTQ 135+X,20Y 

FR 3360 PLOT 127 + X , 13+ Y » DRAWTO 127+X, 13Y 

MB 3370 NEXT X 

ET 3380 H = 3 : J = 3 : GOSUB 3440 

HK 3390 K=1'G05UB 5100 

EB 3400 H = 2 i J=4 « GOSUB 3440:FOR N=l TO 100 
s NEXT N 

UC 3410 H=3 i J=3 : GOSUB 3440:GOSUB 5100:FOR 

N=l TO 50:NEXT N 
HZ 3420 K=K+l:IF K<3 THEN GOTO 3400 
AS 3430 RETURN 

GJ 3440 COLOR H:PLOT 120 , 20 : DRAWTO 117,26 
tCOLOR J:DRAWTO 110 , 40 : DRAWTO 115,35:D 
RAWTO 105,55 

HM 3450 DRAWTO 1 10 , 50 * DRAWTO 100,70 

BB 3460 RETURN 

KJ 3500 REM .THERMOMETER 

YK 3510 COLOR 1 

ZA 3520 R=5 

TN 3530 FOR X=-R TO R STEP 1 
YB 3540 Y=S0RCR*R-X*X> 

IB 3550 PLOT 20+X, 66+Y * DRAWTO 20+X,6S-Y 
MC 3560 NEXT X 

BZ 3570 PLOT 19,65:DRAWT0 19,30:PLOT 20,6 
5 i DRAWTO 20,29:PLOT 21,65'DRAWTO 21,30 

BJ 3580 RETURN 
TJ 3600 REM SUN 
ZK 3610 COLOR 3 
OM 3620 R=10 

TP 3630 FOR X=-R TO R STEP 1 
YD 3640 Y=50RCR*R~X*XJ 

MM 3650 PLOT 100 + X,20 + Y * DRAWTO 100 + X,20-Y 
ME 3660 NEXT X 

OT 3670 A = 0»H = UI=4: J = 4:L = 4 

HT 3680 COLOR 3:PL0T 87,20'DRAWTO 86~A,20 

:PLOT 112, 20 : DRAWTO 114 + A , 20 * PLOT 100, 

8 ' DRAWTO 100,7-A*PLOT 100,32 
ND 3690 DRAWTO 100 , 33 + A * PLOT 90,12'DRAWTO 
90-A, 12 A * PLOT 110 , 12 « DRAWTO 110 + A,12 
A:PLOT 90,30:DRAWTO 90~A,30+A 
QP 3700 PLOT 110,30»DRAWTO 110+A,30+A 
EU 3710 COLOR H:PLOT 148 , 27 i DRAWTO 150,25 

' DRAWTO 152,27 
DJ 3720 COLOR I:PLOT 137 , 32 « DRAWTO 140,36 

: DRAWTO 143,32'PLOT 140,34 
EW 3730 COLOR J'PLOT 126 , 49 : DRAWTO 130,46 

•DRAWTO 134,49:PL0T 130,46 
TZ 3740 COLOR L^PLOT 116 , 50 : DRAWTO 122,56 

' DRAWTO 128,50sPLOT 122,55 
IE 3750 IF A=0 THEN H=4 : 1=1 
KG 3760 IF A=l THEN I=4sJ=l 
NE 3770 IF A=2 THEN J=4 i L=l 
SC 3780 A=A+i:IF A=5 THEN RETURN 
KM 3790 GOSUB 52O0:FOR G=l TO 10<NEXT G 
UW 3800 GOTO 3680 
UZ 3810 GOTO 3680 
QQ 3850 REM BAR GRAPH 
ZN 3855 U = 70-C'2 * FOR 0 = 48 TO 58 
XZ 3860 COLOR 2'PLOT Q,70:DRAWTO Q,U:COLO 

R 3:DRAWT0 0,20 
JM 3870 NEXT Q 
BS 3890 RETURN 

TN 4000 X=0:IF W«="N" OR W$="n" THEN W=0J 
X = l 

HW 4010 IF W*="NE" OR W$="ne" THEN W=1*X= 
1 

IG 4020 IF W$="E" OR W«="e" THEN W=2*X=1 
RX 4030 IF W*="5E" OR W*="se" THEN W=3«X= 

EK 4040 IF W*="5" OR W*="s" THEN W=4*X=1 
UU 4050 IF W*="5W" OR W*="sw" THEN W=5:X= 

MS 4060 IF W*="W" OR W*="w" THEN W=6:X=1 
RQ 4070 IF W*="NW" OR W*="nw" THEN W=7'X= 

QQ 4080 IF X=0 THEN ? "BAD DATA-TRY AGAIN 
":GOSUB 5020'GOTO 150 
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BS 4098 GO SUB 5000:GOTO 160 

QB 4100 X = 0*IF 5$="C M OR 5S = '«c" THEN 5 = 0: 
X = l 

H5 4110 IF SS=»P» OR S$="P M THEN 5=10:X=1 

EY 4120 IF 5S=»M" OR 5S=»m" THEN S=20:X=1 

JC 4130 IF SS=»0" OR 5S=»o" THEN S = 30:X = 1 

OQ 4140 IF 5S=»R" OR SS=»r" THEN 5=40:X=1 

XF 4150 IF X = 0 THEN ? "BAD DAT A ~ TRY AGAIN 

":G05UB 5020:GOTO 225 
ZQ 4160 GOSUB 5000:GOTO 230 

AZ 4200 ? "BAD DATA TRY AGAIN" : GOSUB 5020 

:GOTO 120 
ML 4300 IF A<28 OR A>31 THEN 4320 
in 4318 G05UB 5888:G0T0 78 

CF 4328 GOSUB 5828:? "BAD DATA-TRY AGAIN" 
* GOTO 68 

OP 4488 IF B<28 OR B>31 THEN 4420 
UU 4410 GOSUB 5000:GOTO 100 

HM 4420 GOSUB 5020:? "BAD DATA - TRY AGAIN" 
:GOTO 90 

MP 5000 FOR Z=150 TO 0 STEP ~10:SOUND 0,9 

,10,Z'10:NEXT Z : RETURN 
RH 5020 FOR Z = 150 TO 0 STEP -10:SOUND 0,Z 

,12,Z:NEXT Z : RETURN 
GO 5100 FOR L = 0 TO 30:5OUND 0 , L*8 , 8 , 1 5 - L ' 

2:S0UND 1 , L*8 , 16 , 1 5 - L / 2 i NE X T L 
AI 5110 RETURN 

WA 5200 FOR F=10 TO 5 STEP -1 

QQ 5210 SOUND 1 , F , 1 8 , 8 : NE X T F:SOUND 1,0,0 

, 0 

XE 5220 FOR F=8 TO 3 STEP -1 

QU 5230 SOUND 1 , F , 18 , 8 « NEXT F:SOUND 1,8,0 



, 0 

UE 5240 FOR F=6 TO 1 STEP -1 
RC 5250 SOUND 1 , F , 10 , 8 : NEXT F:SOUND 1,0,0 
, 0 

AZ 5260 RETURN 

UP 31000 TRAP 31140:OPEN »3 , 8 , 8 , "P t " : TR AP 
4000 

US 31010 FOR Y=0 TO 78 STEP 2 
US 31020 FOR X=0 TO 158 STEP 2 
OS 31030 LOCATE X,Y,Z 

AP 31040 IF Z = 8 THEN ? »3;" ";:GOTO 31080 

DG 31045 REM COLOR 1,Z = 8 BACKGROUND 

KU 31050 IF Z=l THEN ? »3 ;"*";: GOTO 31000 

BB 31055 REM COLOR 2,Z = 1 

ZU 31060 IF Z = 2 THEN ? **3 ; "o" ; : GOTO 31080 

CR 31065 REM COLOR 3,Z = 2 

BK 31070 ? »3;"+"; 

EH 31075 REM COLOR 4,Z=3 

MY 31088 IF X=158 THEN PRINT »3 

NU 31898 NEXT X 

NA 31180 NEXT Y 

WY 31118 ? »3;" TEMP "; 

YB 31115 ? «3;" x PRECIP 

PF 31128 ? »3;" •• j 

FORECAST ":? «3 
FC 31138 ? «3;" ";TS;» 

";C;" ";F$ 
BX 31135 IF CSENSORSJ THEN ? »3;" TEMP="; 

INT CMTEMP*PEEKC624* +BTEMP* , , 
BC 31136 IF <5ENS0RS> THEN ? »3;"HUM=";IN 

T cMHUM*PEEKc62 5>+BHUM> 
DA 31140 CLOSE **3 : RETURN 
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HZ 18 REM NEW OWNER'S COLUMN, PART 4 
PQ 28 REM BY D AMID PLOTKIN 
GL 38 REM CO 1986, ANTIC PUBLISHING 
QO 48 DIM QUE5TI0NS C58) , ANSWERS CD , YOURAN 
5WERS CI* 

UQ 58 XXX = l: Y Y Y=2 : ZZZ=3 : RT=8 : WG=8 : REM SET 

UP THE UARIABLES 
BO 68 GRAPHICS 8:P0KE 752,1 

ZM 78 POSITION 4,8:PRINT "RJK^MiOT^OTWWiimW 

nb 88 position 3,3:print --M^LumryiLinrieigHaiaGi 

RG 98 POSITION 3,4:PRINT "PRESS U FOR TRU 

E, [U FOR FALSE":P05ITI0N 11,5:PRINT "A 

ND Cfl TO QUIT" 
ZF 188 FOR X=8 TO 39:P0SITI0N X,6:PRINT " 

*";:SOUND 8,X*3+28,18,6:NEXT X:SOUND 0 

,8,8,8 

HG 118 RESTORE 1888:TRAP 388:REM FALLS TH 

ROUGH WHEN OUT OF DATA 
KQ 128 READ QUESTIONS , ANSWERS 
HO 138 FOR X = 8 TO 38:P0SITI0N X,9:PRINT " 
";:SOUND 8,288-X*4,18,6:NEXT X:50UND 

8,8,8,6 

RN 148 FOR X=3 TO 38:P05ITI0N X,11'PRINT 
" ";:SOUND 8 , 288 - X*4 , 1 8 , 6 i NE X T X:SOUND 
8,8,8,6 

GJ 158 X=C39-LENCQUESTI0N$>>'2: POSITION X 

,9:PRINT QUESTIONS 
JK 168 POSITION 3,ll:PRINT "URUE OR HALSE 

"; :INPUT YOUR ANSWERS 
ML 178 IF ANSWERS =Y0URAN5WERS THEN GOSUB 

586:RT=RT+l:G0T0 128 : REM RIGHT ANSWER 



UL 188 IF Y0URAN5WERS=»Q» THEN GRAPHICS 8 

:GOTO 488:REM READY TO QUIT 
HX 185 IF Y0URAN5WERSO"T" AND YOURANSWER 

$<>"F" AND YOURANSWERSO-Q" THEN GOTO 

138 

WB 198 WG=WG+l:REM ANSWER IS WRONG 

Z5 288 FOR X=l TO 5:P05ITI0N 3,14:PRINT " 

HtffliiraQBBra^^ ; * sound 8 , x*i 0 a 

'2,10,4 

GU 218 FOR WAIT=1 TO 36:NEXT WAIT:P05ITI0 
N 3,14:PRINT "SORRY! ANSWER IS WRONG"; 
:50UND 6,8,8,8 

QG 220 FOR WAIT=1 TO 30:NEXT WAIT 

XH 230 NEXT X:POSITION 3,14:PRINT " 

•1 • 

ML 240 GOTO 120 

JG 300 GRAPHICS 0:POSITION 3,5:PRINT "THA 

NK YOU FOR TRYING OUT THIS" 
XI 310 POSITION 1,6'PRINT "LOGIC TEST IN 

UQILiBQI»[!HM[Ml(l[;ia@H[§m[l[QaDm" 
AU 320 POSITION 7,7:PRINT "SEE YOU NEXT M 

ONTH!" 
MA 400 POSITION 1,9 

FB 410 IF WG=0 THEN PRINT "CONGRATULATION 

5!!! YOU GOT THEM ALL" : END 
BD 420 PERC=RT' cRT+WG)*100: PRINT "YOU GOT 

";PERC;"K RIGHT" 
LC 430 POSITION 2,12'PRINT "WANT TO TRY A 

GAIN CY'N> ";: INPUT YOURANSWERS 
BM 440 IF YOURANSWER$="Y" THEN GOTO 50 
ZW 450 POSITION 2,14:PRINT "GOODBYE ! ! " ; : E 

ND 
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FC 580 FOR X = l TO S*PQSITION 3, IMPRINT " 
f[ltrimmfflnil«[s¥^)Wf!ll Wi»M»B[:»lMLI IH " ; * F 0 R Y = 1 8 to 
30J5OUND 0,X*100'2+Y,10,4:NEXT Y 

YY 618 FOR WAIT=1 TO 30'NEXT WAIT^POSITIO 
N 3,14:PRINT "HURRAY ! ANSWER IS RIGHT" 
; : SOUND 0,8,8,0 

QJ 628 FOR WAIT=1 TO 30:NEXT WAIT 

QR 638 NEXT XiPOSITION 3,I4:PRINT " 

11 1 

ZJ 648 RETURN 
PR 999 END 

UG 1000 REM DATA FOR QUESTIONS 

FT 1010 DATA tXXX=l AND YYY=2 AND ZZZ = 3> , 



US 1020 DATA 
OF 1030 DATA 



CXXX>1 OR Y Y Y > 2 OR ZZZ=3> , T 
CXXX=5 AND YYY=2> OR ZZZ>2,T 
QK 1040 DATA cXXX*YYY>>8 AND ZZZ=3,T 
LG I860 DATA <XXX=2 OR YYY=2> AND ZZZ=2,F 

UE 1060 DATA cXXX=l AND YYY = 3 > AND tXXX=3 A 



ND ZZZ=3>, 
RB 1078 DATA 
ZZZ=3> ,T 
XN 1880 DATA 

D ZZZ=3>,F 
NB 1898 DATA 
FE 1188 DATA 
ZW 1118 DATA 

ZZ = 3> , T 
KW 1128 DATA 

Y> , T 
UO 1130 DATA 

Y> , T 
MR 1148 DATA 

YY> , F 
GL 1158 DATA 

R ZZZ=3>,T 



CXXX = 1 OR YYY = 3*AND CXXX = 3 OR 

cXXX=3 AND YYY=2> OR CYYY=4 AN 

cXXX<YYY> AND cYYY>ZZZ>,F 
CXXX<YYY> OR cYYY>ZZZ>,T 
CXXX=YYY1 OR CYYY=ZZZ> OR CZ 

CXXX=YYY AND Y Y Y=2> OR CZZZ > YY 
CXXX+YYY> YYY+XXX> OR cZZZ>YY 
CXXX+YYY>YYY+XXX> AND cZZZ>Y 
CXXX=5 AND YYY=18>0RCYYY=7 0 
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UG 
ED 
DO 
CM 
UY 
FN 

DK 

RH 

FD 

PM 
HB 
UG 
AA 

YU 
KA 



KL 
GF 
TG 
GI 



ZI 
KH 
DR 
DC 



YX 



US 
US 



i B5M* C48> ="■" s 
'HBSBHRBO" 

, PS3* C38> , PS4* 

15 : RE AD A*LIN 



2 REM BOMB SQUAD 

3 REM BY PAUL TUPACZEWSKI 

4 REM cc) 1982, ANTIC PUBLISHING 
10 POKE 186, PEEKC740* 
28 DIM EX* C4J :EX* = "* + 
26 DIM BSM* C48J * B5M* = 
BSM* C2> = B5M* » BSM* c7, 14 1 = 
38 DIM P51$ c30> , P52* c30> 
C30>,STOR*C12>,LINC15> 
32 RESTORE 3S»F0R R=l TO 
cR>=A*NEXT R 

35 DATA 0,0,0,0,345,345/345,0,360,360/ 
360, 0, 385, 380,385 
40 GOSUB 1070 

46 POKE 710,0iGO5UB 91S«P0KE 559,34 
50 GOSUB 876 

65 LU = C3:5C = C0!RD = C1» BOMB5=C0 « B0NU5-C1 
:EXLU=10000 

60 B N ~ C 0 ' F R Z = C 0 : S Q U = C 0 

65 GRAPHICS 17 i DL = PEEK c560> * PEEK C661 > * 
256*C4«F0R R=DL+C3 TO DL+12*P0KE R,7«N 
EXT RsGOSUB 75S*P0KE 77,C0»SA=C1 

ST'266*P0KE 710,150>POKE 7 



C1,C0«? «6; 
CI, 12 » ? »6; 



HIMfHfll 



cl&» HI 



C1,CH? «6)SC*P0SITI0N CI, 
11,13*? **6;RD»P0SI 



70 POKE 756, 
89, 196 
75 POSITION 

HUBS" 

88 POSITION 
MDffillBB" 
86 POSITION 
13*? *t6;HS<P0SITI0N 
TION 16,13 „ „ 

90 FOR R=C1 TO LU»? «6 ; CHR* cC5 ) ; i NEXT 
REPOSITION 16,C1*? «6; "0" « L=RD * LT=C1 
95 IF L>C5 THEN L = L - C6 » LT = LT + Ci * GOTO 9 
6 

100 HARD=LT/C2 i ENAD=C1+LT i ENAD1=C1 +LT * 
ON L GOTO 105,135,155,195,220 
105 COLOR 36*PL0T C8,6:DRAWT0 12,6*PL0 
T 13,C4*DRAWT0 17,C4»PL0T 13,C8'DRAWT0 
17, C8 

110 PLOT 7,C4sDRAWT0 C3,C4»PL0T 7,C8»D 

RAMTO C3,C8*C0L0R 7»PL0T C8,11'DRAWT0 

19,1HPL0T C0,C10»PLOT 19,C10 

116 PLOT C0,C3:PLOT C0 , C2 * PLOT C 1 , C2 t P 

LOT 18,C2*PL0T 19,C2*PL0T 19, C3 

120 RESTORE 486*G0SUB 465 
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OJ 

NO 
KT 



PX 



ZE 

NS 
FL 



PI 
RE 



KI 
AY 



NT 
TB 

OA 

FI 



UU 



JB 
XH 

OA 
JD 



AM 



SO 
GY 



, 9,C8*PL 
C10,C5*PLQT 



126 BX=128«BY=38iEXl=68iEYl=90»EX2=190 

:EY2=80 

138 GOTO 248 

135 COLOR 36'PLOT C18,ll:PL0T C18,C8*P 
LOT C10,5*PLOT 7,C4*PL0T 7,7'PLOT 7, CI 
8*PL0T 13,C18*PL0T 13,7«PL0T 13, C4 
148 COLOR 7'PLOT 9,11'DRAWTO C8,lliDRA 
WTO C8,C2»PL0T 19,C2sDRAWT0 19,ll:DRAW 
TO 11, 11 : RESTORE 585*G0SUB 465 
14 5 BX=S8:BY=88tEXl=68iEX2=58iEYl=64iE 
Y2 = 4B 

158 GOTO 248 

155 COLOR 36<PL0T C6,C4*DRAWT0 
OT 11,C8*DRAWT0 16,C4*PL0T 

C4,7»PL0T 16,7 
168 RESTORE 500 * GOSUB 466 
165 COLOR 7*PL0T 9,C2*DRAWT0 11,C2*DRA 
WTO 11,C3*PL0T 9,C3*DRAWT0 9,C2*PL0T 9 
,C3sDRAWTO 8,C2*PL0T 11,3:DRAWT0 12,2 
178 PLOT C3,C5*PL0T C5,C5sPL0T C4,C4'P 
LOT 15,C5sPL0T 16,C4»PL0T 17, C5 
175 COLOR 361PL0T C8,1HDRAWT0 19,11*C 
OLOR 7JPL0T 8,18*DRAWT0 2,18*PL0T 8,9» 
PLOT 8,8iPL0T 1,9«PL0T 19,8*PL0T 19,9 
180 PLOT 19,10»DRAWTO 17,18»PL0T 18,9 
185 BX = 2B8iBY=:30iEXl = 70>EX2 = 60*EY2:=64> 
EY1=40 

190 GOTO 240 

195 COLOR 36*PL0T Cl,ll«DRAWTO 18,1HP 
LOT C1,C4*DRAWT0 18,C4»PL0T C4,C8«PL0T 

16,C8iPL0T 8,C8JPL0T 12, C8 
288 COLOR 7*PL0T 18,C5:DRAWT0 18,9sPL0 
T C3,C5:DRAWT0 C8,18:PL0T 17,C6*DRAWT0 

19,10*PLOT C4,C5*PL0T C3,6«PL0T C5,6 
205 PLOT 16,C6tPL0T 15,6iPL0T 17,6 
210 RESTORE 510'GOSUB 465 *• BX = 60 ' BY = 60 ' 
EXl = 128:EX2 = ll5iEYl = 64* EY2 = 20 
215 GOTO 240 

220 COLOR 7:F0R R^Cl TO 19 STEP C2*F0R 
T = C3 TO 9 STEP C3»PL0T R , T NEXT T'NEX 
T R 

225 COLOR 36*F0R R=C2 TO 18 STEP C2«F0 
R T = C5 TO 11 STEP C3*PL0T R , T * NEXT T * N 
EXT R 

230 RESTORE 516 » GOSUB 465 
235 BX=128!BY=64JEXl=58JEX2=28BiEYl=2S 
* E Y 2 = E Y 1 continued on next pase 
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XF 240 GOSUB 825 

NY 245 X=128* Y=83:P0KE 704,72*POKE 706,15 

6:P0KE 707,82 
BY 250 LR=C0*UPDN=C0* ST0R*=MAN$cCl,C12> 
FL 255 POKE 705 , 196 * BAL=C1 t LFTRGT = C0 * BN = C 

0» FRZ = C0 sMTl = C0 * WT2=C0 « MT3=C0 : SQU=C0 
OC 260 A=USRCMOUE,C0, PMB, ADRcSTORSJ ,X,Y,C 

12» 

YR 266 POKE 53278, CI : IF SC>=EXLU THEN EXL 

U=EXLU+10000 * LU = LM* cLU < > 3* sPOSITION 15 

♦LU,13*? t*6;CHR$c5> 
MM 270 IF PEEKc53252>=CB THEN GOSUB 700 
MS 275 IF PEEKC532521=C2 THEN LR = INT cRND c 

0>*C3> -CI : UPDN=-INT cRND C0> *C2:> 
SH 280 IF PEEKC53252* =C1 THEN GOSUB 620 
FI 285 IF SGU=C3 THEN SOUND CI , WT3 , 10 , C4 : 

MT3 = MT3 - 7 • 5 « IF MT3<=C0 THEN SOUND C1,C 

0,C0,C0:SQU=C0 
HB 290 IF FRZ=C3 THEN SOUND C2 , 100 - MT2+10 

0*cMT2'C2=INT cMT2'C2>> , 10, C 4 • UT2=UT2+C 

1«IF HT2 = 30 THEN FRZ=C0:5OUND 2,0,0,0 
DN 295 IF PEEKC532791 =6 THEN GOSUB 760'GO 

TO 50 

GH 300 IF PEEKC764J033 THEN 320 
MY 305 POKE 764,255 
FH 310 IF PEEKC764K>33 THEN 310 
XA 315 POKE 764,255 

Q Q 320 A=USRcM0UE,Cl,PMB,ADRcBALL$cSA*C8~ 
7, 5A*C8:> >,BX,BY,C8>:SA=SA+Cl-7*cSA=C8* 

UT 325 A=USRcM0UE,C2,PMB, ADRcENl** ,EX1,EY 

ZU 330 A=U5RcM0UE,C3,PMB,ADRcEN2$*,EX2,EY 
2,C8* 

GN 335 S=5TICKcC0> s UPDN=UPDN~ cS=14 OR S = l 

0 OR S=6J-cUPDN>C3J+cUPDN<-C33 JLFTRGT= 

CS>C4 AND S<C12> 
FR 340 LR=LR+cS=7 OR 5 = 6 OR S = C5> - c5 = ll 0 

R 5=10 OR S=9J - CLR>5> + CLR< -5* i GOTO LIN 

CS) 

OT 345 5T0R$=MAN* C25, 36) i SOUND C0,100,C8, 

C4:G0T0 405 
SN 360 5T0R$=MAN$ c37, 48> "SOUND C0,10O,C8, 

C4tGOTO 405 
FN 375 SOUND C0 , C0 , C0 , C0 : GOTO 405 
IL 380 SOUND C0 , 100 , C8 , C4 I GOSUB 395:G0T0 

405 

ZQ 385 SOUND CO , CO , C0 , CO ' FOR R=C1 TO C2 ' I 
F 5T0R$=MAN$ CR*C12+13, R*C12+24> THEN S 
TOR$ = MAN$ CR*C12-11, R*C12) 

LE 390 NEXT R:GOTO 485 

UE 395 FOR R=C1 TO C2*IF 5T0R*=MAN$ CR*C12 
-ll,R*C12i THEN STOR$=MAN$ cR*C12+13, R* 

C12+241 
PU 400 NEXT R RETURN 

GU 405 GOSUB 580 t X=X+LR i Y= Y+UPDN : UPDN=UPD 

N+CS014 AND SOCIO AND 5 < > 6> - cUPDN > 5* 

tIF Y>91 THEN UPDN=C0»Y=91 
UD 410 IF LFTRGT = C0 THEN LR=LR~ 5GN cLR* 
NZ 415 LFTRGT = C0 s IF RNDcC0s>0.99 AND BN<> 

C2 THEN GOSUB 670 
KU 420 MT1 = MT1+ CBN = C2J IF WT1=45 THEN COL 

OR 32:PL0T Z1,Z2:BN=C0 
TA 425 IF RNDcC0> >0.99 AND FRZ=C0 AND SQU 

=C0 THEN GOSUB 680 
CH 430 MT2=MT2+ CFRZ=C25 s IF WT2=45 THEN CO 

LOR 32:PL0T Z3,Z4»FRZ=C0 
UF 435 IF RND cC0> >0 . 99 AND FRZ=C0 AND SQU 

=C0 THEN GOSUB 690 
YU 440 MT3=MT3+ CS0U=C2J : IF WT3=40 THEN CO 

LOR 32 s PLOT Z5,Z6:5QU=C0 
PH 445 X = X - LR* CX<50>-LR*CX>200* *Y = Y + 6**cY< 

9J 

FH 450 IF PEEKC53260* THEN 530 

OT 460 GOTO 260 

HQ 465 COLOR 129:DA=C1 

FM 470 READ XX,YY:IF XX=-C1 THEN 480 

PX 475 PLOT XX, YY!P51$cDAJ=CHR«cXXJ «P52S c 

DA*=CHRStYYi : D A=D A+ CI ' GOTO 470 
YV 480 PS1$<DA>=" " i P52* cDA> =•• " ' OA- DA - CI 

: RETURN 

ZK 485 DATA 3,3,8,5,13,7,13,3,3,7 

MI 490 DATA 7,3,17,3,17,7,7,7,12,5 

JH 495 DATA 5,3,5,7,10,5,15,3,15,7,-1,-1 

5H 500 DATA 5,3,6,4,7,5,8,6,9,7,11,7,12,6 

,13, 5, 14,4, 15, 3,4, 6, 16, 6, 10,4, -1,0 
FJ 505 DATA 10,10,10,7,10,4,7,3,7,6,7,9,1 

3,9,13,6,13,3,1,0 
WG 510 DATA 2,10,5,10,15,10,18,10,3,3,8,3 

,12, 3, 17, 3, 4, 7, 16, 7, 8, 7, 12, 7, -1,0 
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DD 515 DATA 2,4,6,4,10,4,14,4,18,4 
CT 520 DATA 4,7,8,7,12,7,16,7 
ZR 525 DATA 2,10,6,10,10,10,14,10,18,10,- 
1 , 0 

NM 530 IF SQU=C3 THEN 565 

EF 535 FOR R=C0 TO C3:50UND R , C0 , C0 , C0 » NE 
XT R:COLOR 32:PL0T Z1,Z2:PL0T Z3,Z4*PL 
OT Z5,Z6 

DD 540 FOR R=C1 TO C4 : A=USR cMOUE , C0 , PMB , A 

DR c BOOM$ cR*C12 11 , R*C12> >,X,Y,C12*:S0U 

ND C0, 100, C0, 16 -R*C4 
TB 545 POSITION 15 + LU,13:? «6 ; EXS cR , R> : fu 

Cl^Cl : NEXT R:LU=LUC1 : A=U5R CMOUE , CO , PM 

B, ADR €••¥••» , C0, C0, CU 
TL 547 GOSUB 1400 

KK 560 IF LU THEN FOR R=C1 TO 200:NEXT R: 
GOTO 240 

UU 555 GOSUB 575 : POSITION 6,6:? «6;"tfPraqB 
HDaHQi" ' FOR R = C1 TO 500:NEXT R:IF SONS 
THEN H5=5C 

RT 560 GOSUB 760:GOTO 50 

LX 565 BX=128:BY=20iEXl=110:EY2=20:EYl=20 
:EX2=145:SC=SC+500*PaSITION Cl,Clr? t*6 

1 SC 

EO 570 FOR R=30 TO 50«FOR T=100 TO C0 STE 
P -R.SOUND C0,T,C10,C4:NEXT T * NE X T R : G 
OSUB 575:G0T0 460 

OR 575 FOR R=C0 TO C3 t A=USR CMOUE , R , PMB , AD 
R €••*••! , C0, C0, Cli : NEXT R • RETURN 

OD 580 REM MOUE ENEMIES 

AI 585 IF FRZ=C3 OR SQU=C3 THEN RETURN 
JF 590 BX=BX-HARD*SGNcBX~X) ' BY=BY-HARD*5G 
NcBYYJ 

GY 595 EY2=EY2+ENADsIF EY2>19 AND EY2<90 
THEN 605 

TX 600 EX2=INT cRNDcC0i«140>+50sEY2=EY2EN 

AD : ENAD=ENAD 
XO 605 EX1 = EX1 + ENAD1 : IF EX1>50 AND EX 1 < 20 

0 THEN 615 

ZU 610 EY1=INT cRND cC0i*70) +20 : EX1=EX1-ENA 

Dl : ENAD1= - ENAD1 
ZT 615 RETURN 

5Y 620 Xl=INTccX-48>/C8> : Yl=cINTcy/C8>J 
5K 625 LOCATE X1,Y1,ZZ:IF ZZ=46 THEN 645 
YT 630 IF ZZ=35 THEN SQU=C3 i WT3=255 ■ GOTO 
660 

JT 635 IF ZZ = 45 THEN FRZ = C3 ' WT2 = 0 » GOTO 66 
ZK 640 RETURN 

SG 645 B0NU5 = B0NU5 + C1 * IF B0NUS>9 THEN BON 

U5 = 9 

CL 650 POSITION C10,C0:? »6 ; BONUS I COLOR 3 

2:PL0T Zl,Z2sBN=C0 
DA 651 FOR R=0 TO 15 : SOUND 0, 121, 10, R: SOU 

ND 1 , 96, 10, 15-R : NEXT R 
AB 655 RETURN 

ZE 660 COLOR 32:PL0T Z5,Z6:RETURN 
ML 665 COLOR 32:PL0T Z3,Z4:RETURN 
RL 670 BN-C2:MTl=C0JZl=INTcRNDcC0>*17i+C2 

l Z2 = INT CRND CC0**C10)+C2:LOCATE Z1,Z2,Z 

Z:IF ZZ<>32 THEN 670 
UM 675 COLOR 46:PL0T Z1,Z2:RETURN 
DT 680 FRZ=C2 : WT2=C0 : Z3=INT cRND CC0»*17J +C 

2 : Z4 = INT cRND cC0) *C10i + C2 s LOCATE Z3,Z4, 

ZZ:IF ZZ<>32 THEN 680 
YK 685 COLOR 45*PL0T Z3,Z4:RETURN 
MB 690 SQU=C2 JWT3=C0»Z5=INTcRNDcC0i*17*+C 

2 i Z6 = INT CRND cC0>mC10s +C2 : LOCATE Z6, Z6, 
ZZJIF ZZ<>32 THEN 690 

BJ 695 COLOR 35:PL0T Z5,Z6:RETURN 

YK 700 REM GOT A BOMB! 

TK 705 X1=INT c CX-40J ^C8i i Yl= CINT CY^C8J » 

OA 707 LOCATE X1,Y1,ZZ:IF ZZ=129 THEN 715 

HI 710 X1=X1+1 i LOCATE X1,Y1,ZZ»IF ZZ<>129 

THEN RETURN 
XM 715 FOR R=C1 TO C3:P0SITI0N X1,Y1«? «6 

; EX* CR, R> : SOUND C0, 10, 8, 20-R*5 * NEXT R • 

SOUND 0,0,0,0 s POSITION X1,Y1»? »6;" 11 
BM 720 BOMBS=BOMB5+Cl:5C=5C+C10*RD:FOR R= 

CI TO DA J IF ASCcPS1$cR,Rji=X1 AND ASC C 

P52$cR,R»j=:Yl THEN 730 
KC 725 NEXT R 

ZO 730 PS3«=P51«CC1,R5 :PS3*CRi=PSl$cR+C13 
* PS4* = PS2$ CC1 , R> : P54$ CRJ =PS2* cR + Cl J « PO 
SITION CI, CI'? «6; SC s POSITION 16, CI 

UD 735 ? »6; BOMBS s PS1$=P53$ : PS2$=PS4* : IF 
P53SO" " THEN RETURN 

YU 740 GOSUB 765 
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•■; BOMBS 
G05UB 815 



OD 745 B0MBS=C8 : RD=RD+C1 : BONUS=Cl ' GOTO 65 

IC 755 PMBA5E=INTccPEEKci45)+C3)'C4)*C4:P 

OKE 54279 , PMBfiSE 
RU 757 PMB=PMBASE*256 i POKE 559,46:P0KE 53 

277,C3:P0KE 623,l:RETURN 
QF 766 FOR R = C8 TO C3 : A = U5R cMOUE , R , PMB , AD 

R €••*••), C8, C8, CD i POKE 784+R,C8:NEXT R: 

POKE S59,34:P0KE 5 32 7 7 , C 8 * RET U RN 
NN 765 REM BONUS POINTS 

UB 778 GOSUB 768:F0R R = C8 TO C3:S0UND R,C 

8,C8,C8:NEXT R 
SF 775 GRAPHICS C8:P0KE 718,C8:P0KE 752, C 

l:POKE 756,ST'256:? 
ON 788 COLOR 47'PLOT C8,?:DRAUT0 32,7:DRA 

WTO 32, 17 : DRAUTO C8,1?:DRAUT0 CB,7:P05 

ITION C8,7:? »6;"'" 
PF 785 POSITION 15,9:? "YOU GOT 
SO 798 POSITION 17,11:? "BOMBS": 

:FOR R=C1 TO 388:NEXT R 
RZ 795 REM 
UR 888 GOSUB 815 

IZ 885 FOR R=15 TO C8 STEP -C3:50UND C8,6 
8,C18,R*NEXT R : 5C=SC+B0NU5«188 : B0MB5=B 
OMBS Cl:IF B0MB5OC8 THEN 795 

KU 816 GOSUB 815:F0R R = C1 TO 388:NEXT R : R 
ETURN 

DO 815 POSITION C18,13:? BOMBS;" x ";BONU 

5*188;" BONUS POINTS " 
JM 828 POSITION 14,15*? "SCORE: ";5C:RETU 

RN 

UF 825 REM "GO!" SCROLL MESSAGE 
UH 827 0L=L*C2 

MM 838 POKE 784 , 0L*16 ~ 6 : POKE 765 , 0L*16 - 6 i 

POKE 786, 0L*16-6 I POKE 787 , 0L*16~6 i X=48 

I X1 = 2B8 I ADD = 3 . 9 
DU 835 A=U5RcM0UE,C8,PMB, ADRcGO*) ,X,68,C8 

) :A=USRcM0UE,l,PMB,ADRcG0*ci7)) , X+C8,6 

8, C8) 

GY 848 A=USRcM0UE,C2,PMB, ADRcGQ* c9)) ,X1,6 

0,C8) : A=USR CMOUE, C3, PMB, ADR cG0*c26)) ,X 

1 + C8, 68, C8) 
OC 845 X = X + ADD : X1=X1~ADD « ADD=ADD~8 • 1 : IF X 

<124 THEN 835 
PY 858 A=USRcM0UE,C8,PMB, ADRcGO*) ,125,68, 

C8) I A = US R CMOUE, CI, PMB, ADRcG0*ci7)) ,133 

i 68, C8) 

RL 855 A=U5R cMOUE, C2, PMB, ADR cGO* c9) ) , 125 , 
6 6, C 8 ) :A = USRCM0UE,C3, PMB , ADR c GO* c25) ) , 
133, 68, C8) 

NO 868 FOR R = C1 TO 288*NEXT R * FOR R = PEEK c 
704) TO PEEK C784) - C18 STEP Cl:POKE 78 
4,R:POKE 786,R:P0KE 786,R*P0KE 787, R 

KL 865 NEXT R 

QF 878 FOR R = C8 TO C3 i A=USR CMOUE , R , PMB , AD 

R("f n ) , C8 , C8 , CD : NEX T R : RETURN 
XO 875 REM TITLE PAGE 

NS 886 GRAPHICS 17 I DL=PEEK CS68) +PEEK (56H 

♦*256 + C4 : POKE DL+C3,7:P0KE 718,78*P0KE 

711,158:P0KE 756,ST'256 
JU 885 FOR R = 21 TO CI STEP -CUPOSITION C 

8,C2:? t*6; BSM* CR, R + 18) :A = C05cCD * NEX T 

R 

US 898 POSITION 9,C18:? »6 ; "BY" * POSITION 
C3,C12:? »6;"PAUL TUP ACZEM5KI" 

CE 895 POSITION 5,17:? tt6;"[iil:»1 start" :P 
OSITION 7,19<? »6 ; "HmiCflllffln" 

UC 968 POSITION CI, 18:? «6 ; "mi:WPJ[!inHilMWia«n 

[uonnifsj* 4 

JU 965 IF PEEKC53279) <>6 AND STRIGCC8) TH 

EN 985 
ZH 918 RETURN 

BH 915 DIM PMMOU* C188) : MOUE=ADR cPMMOU*) : R 

ESTORE 958:Cl=l:C2=2:C5=5:C8=8:C18=18: 

C12=12:C4=4:C8=8:C3=3 
UG 928 FOR X=C1 TO C18*C18:READ N«PMMOU*c 

XJ =CHR* cN) : NEXT X 
IQ 925 DIM MAN* C48) , BALL* c64) : FOR R=C1 TO 
48 : READ D : MAN* cR) = CHR* CD) : NEXT R : FOR 

R = C1 TO 64 : RE AD D » BALL* cR) - C HR* CD) 
JB 936 NEXT R t DIM EN1* cC8) , EN2* CC8) : FOR R 

= C1 TO C 8 - READ D 

UT 933 EN1 * CR) =CHR* CD> :NEXT R J FOR R = C1 TO 

8 *• R E A D D » EN2* cR) =CHR* cD) 
10 936 NEXT R : DIM G0*c32):F0R R=l TO 32 i R 

E AD D : GO* CR) =CHR* CD» : NEXT R 
HR 948 DIM BOOM* c48) : FOR R-l TO 4 8 : READ D 

:BOOM*cR)=CHR*cD):NEXT R 
AC 945 RETURN 

UF 958 DATA 216,184,184,184,133,213,184,2 
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4, 185, 2, 133, 286, 184, 133, 285, 184, 133, 28 

4, 184, 133, 283, 184, 184, 133, 288 
IU 955 DATA 184,164,133,289,184,184,24,18 

1,289, 133, 287, 166, 213, 24 8, 16, 165, 205, 2 

4, 185, 126, 133, 2 85, 165, 2 86, 185 
IM 968 DATA 8,133,286,282,268,248,166,6,1 

62, 8, 19 6,289, 144, 19, 196, 28 7, 176, 15, 132 

,212,13 8,168,177,2 83,164 
LT 965 DATA 212,145,285,232,169,8,248,4,1 

69, 6, 145, 285, 288, 192, 128, 28 8, 224, 166, 2 

13, 165, 268, 157, 6, 268, 96 
XD 976 DATA 24,36,36,24,212,246,219,254,2 

28,28,28,38 
SL 975 DATA 24,36,36,24,43,111,219,127,59 

,56,56, 128 

JG 980 DATA 24,36,36,24,212,246,219,254,2 

20, 186, 172, 86 
AR 985 DATA 24,36,36,24,43,111,219,127,59 

,61,58, 117 

KM 990 DATA 60,126,255,63,63,255,126,60 
HA 995 DATA 60,126,255,159,159,255,126,60 



SB 1000 
0 

MP 1005 
0 

RU 1010 
0 

EQ 1016 
0 

RX 1020 
0 

TB 1025 
0 

KQ 1030 
UL 1035 
4 

FL 1040 
HU 1045 
UY 1050 
JD 1055 
RX 1060 
255, 
126, 



DATA 60, 126, 255, 207, 207, 255, 126, 6 

DATA 60,126,255,231,231,255,126,6 

DATA 60, 126, 255, 24 3, 24 3, 255, 126, 6 

DATA 60, 126, 255, 24 9, 24 9, 255, 126, 6 

DATA 60, 126, 255, 252, 252, 255, 126, 6 

DATA 60, 126, 255, 126, 126, 255, 12 6, 6 



DATA 66,36,60,90,126,90,102,60 
DATA 126,219,255, 189, 219, 102, 60 



DATA 127,0,158,0,146,0,195,0 

DATA 0,195,0,158,0,146,0,127 

DATA 254,0,73,0,73,0,25,0 

DATA 0,26,0,73,0,79,0,254 

DATA 255, 255, 255, 255, 255, 255, 255, 

255, 255, 255, 255, 0, 126, 126, 126, 126, 

126, 126, 126, 126, 126, 0 



KN 1066 DATA 8,8,68,68,60,68,60,68,68,68, 
8, 8, 8, 8, 8, 24, 24, 24, 24, 24, 24, 8, 8, 8 

DP 1878 POKE 186, PEEKC186) -5 : GRAPHICS 6:C 
H5ET=cPEEKcl86)+l)«266 

DJ 1872 GRAPHICS 2+16*P0KE 718 , 0 » POSITION 
7,4:? «6; "ANTIC" i POSITION 5,5*? »6;»P 
RESENTS! " 

AX 1875 CHI=CHSET/256:ST=CH5ET:CLO=0*POKE 

283,CL0:P0KE 284, CHI 
CU 1888 DIM XFR*C28) * XFR* = M hO*OfflODOO[ZlllSI!3[a 

isiwraniraiJiEaiJiMffiiam*" 

SU 1895 XFR=USRCADRCXFR*)) 'RESTORE 1118 

HP 1188 READ A * IF A=-l THEN RETURN 

NE 1185 FOR Z = 8 TO 7 * READ J i POKE CHSET + A* 

8+Z,J'NEXT Z'GOTO 1168 
OX 1118 DATA 1,4,8,68,118,94,94,126,68 

3, 24, 36, 98, 165, 165, 98, 36, 24 
4, 238, 221, 187, 119, 8, 8, 8,8 
6, 24, 36, 36, 24, 126, 24, 36, 182 
6, 8, 8, 182, 68, 24, 68, 162, 8 
7, 16, 56, 56, 124, 124, 254, 16, 16 



FR 1115 DATA 
RQ 1128 DATA 
QJ 1125 DATA 
UH 1138 DATA 
UN 1136 DATA 



HD 1146 DATA 

II 1145 DATA 

EU 1158 DATA 

DI 1155 DATA 

IS 1168 DATA 

BS 1165 DATA 
MQ 1178 DATA 

NR 1175 DATA 

95,255 
IA 1188 DATA 

OQ 1186 DATA 

HE 1198 DATA 

KE 1195 DATA 

CF 1288 DATA 

KZ 1286 DATA 



8, 8, 56, 28, 126, 28, 66, 8, 6 

9,8,28,56,126,56,28,8,8 

18,6,6,36,24,24,36,8,8 

11, 8, 74, 36, 88, 26, 36, 82, 8 

12, 13 7, 82, 36, 154, 89, 36, 74, 14 

13, 8, 24, 66, 182, 182, 66, 24, 6 
14, 66, 195, 24, 36, 36, 24, 196, 66 

15,255,195,195,219,219,195,1 

16,8,68,118,118,118,118,68,6 

17, 6, 28, 66, 28, 28, 28, 127, 6 
18, 8, 66, 118, 28, 66, 112, 126, 8 
19, 8, 126, 14, 28, 14, 116, 66, 8 
28,8,14,38,62,118,126,14,8 
21, 8, 126, 112, 124, 14, 110, 60,0 



YC 1218 DATA 22,8,68,112,124,118,118,66,8 



DG 1216 DATA 
KE 1228 DATA 



23, 8, 126, 14, 28, 56, 112, 112, 6 
24, 0,68, 118, 68, 118, 118, 68, 8 

continued on next pase 
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NG 


1225 


B J 


1230 




a 
, o 


NQ 


A *> O 9 


B I 


124 0 

X A "t o 


5 E 


1245 


AM 


1256 


GS 


1255 




8 


VB 


1266 




, 6 


MO 


1265 


CD 


1276 




, 8 


KU 


1275 




, 8 


DI 


1288 




,8 


EO 


1265 


FN 


1298 




, 8 


GI 


1295 


K5 


1368 


BF 


1385 




, 8 


CB 


1318 




i 8 


AP 


1315 






JF 


1328 


00 


1325 




,8 


U J 


1336 


BN 


1335 




, u 


PC 


1348 


c t* 

5 L 


4 "? vt CT 

1 J45 


GC 


1358 




8 


HZ 


1365 


JQ 


1368 


RY 


1366 


NN 


1378 


EH 


1376 


UO 


13B8 


RT 


13B5 


FL 


1398 


QQ 


1488 




EN OX 


SO 


1485 




THEN 


OH 


1418 




THEN 


BE 


1416 



JQ 1366 DATA 66 , 8 , 1 1 8 , 1 1 8 , 68 , 60 , 1 1 8 , 1 1 8 , 8 



LISTING 2 



YE 10 REM BOMBSQUAD, LISTING 2 

OF 20 REM BY PAOL TOPACZEWSKI 

GL 30 REM cc) 1986, ANTIC PUBLISHING 

AR 35 REM CREATES LINES 25 AND 1080. 

CQ 40 REM CLINES 10-220 MAY HE USED WITH 

OTHER OASIC LOADERS IN THIS ISSUE • 
IS 46 REM CHANGE LINE 70 A5 NECESSARY • * 
MG 60 DIM FN* C20> , TEMP* c20> , AR* c93> 
HO 60 DPL = PE£KC10S92» * POKE 10592,255 
MO 70 FN*="D:LINES.L5T":REM THIS IS THE N 

AME OF THE DISK FILE TO BE CREATED 
YS 60 GRAPHICS 0s? ANTIC'5 GENERIC 

BASIC LOADER" 
CD 90 ? ,"BY CHARLES JACKSON" 
PM 100 POKE 1 8592 , DPL ' TRAP 170 
PO 110 ? »? s? "Creating " ; FN* * ? . .niea 

se stand by." 
LQ 120 RESTORE ' READ LN : LM~- LN : DI M A* CLN> * 

C = l 

BK 130 AR*-""fREAD AR* 

XM 140 FOR X = l TO LEN c AR* J STEP 3»P0KE 75 
2 , 265 



DG 160 LM~LM~1 » POSITION 10,10:? ••cCountdo 

wn . . . T-"; INT ci.M'10> ; "» 
UY 160 A*tC,Cl=CHR*tUAL CAR*cX,X+2>>> :C=C+ 

1 'NEXT X'GOTO 130 
MZ 170 IF PEEKC195>=5 THEN ? :? :? "QTOO 

MANY DATA LINES!":? "CANNOT CREATE FIL 

E ! " » END 

CZ 180 IF C<LN*1 THEN ? :? "QTOO FEM DATA 

LINES ! i ? "CANNOT CREATE FILE ! " * END 
AL 200 OPEN »1, 8,0, FN* 

PP 210 POKE 766, H? ttijA*;:PQKE 766,0 

AF 220 CLOSE til: GRAPHICS 0>? "■MMIi'lUIJIIHlaNOH 
it 

HU 1000 DATA 127 

UZ 1010 DATA 0500530320680730770320660830 

7703604 005204 8 041058066083077036061034 

22 3034 058066083077036 04 0052 
FB 1020 DATA 0480410610342230340680660830 

77036 040050041061066083077036058066083 

07 703604005 5044049052041061 
TU 1030 DATA 0341871881891981912192282218 

341558498488568488328688738771,326 888 70 

082036040050056041058868078 
AZ 1840 DATA 8820368616341841696601332051 

6816 922413328617728514528328828824 9238 

284236286165266281228208239 
XL 1850 DATA 896034155 
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BASIC BIORHYTHMICS 



Article on pase 77 



LISTING 1 



100© 
1010 
1020 
1030 
1040 
1050 
106O 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1408 
1410 
1420 
1430 
1440 
1450 
146© 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 



ST BASIC Biorhythns 
Ver. 830386 

CCD 1986 Antic publishing 
Written by Steve Whitney 



gosub INITIALIZE 

y 

while not finished 
gosub BIORHYTHM 
wend 
end 



COUNTDAYS: 

days=0 

birthtine=( birthyear*l00OB+birthnonth*i08+birthday 
printtine=( printyear*l0000+ printiionth*el0e + printday 
if birthtine > printtihe then gosub SWAPDATES 
days=( 365-25**£ printyear-birthyear-l 33 
if birthMonth<Decenber then gosub RESTQF YEAR 
if printwonth> January then gosub FIRSTOFYEAR 
gosub FIRST LAST MONTH 
return 



SWAPDATES: 
swap birthday, print day 
swap birthnonth, print Month 
swap birthyear, printyear 

return 



RESTOFYEAR : 

for honth=birthnonth+l to December 
days=days+nonth( Month } 

next wonth 
return 



FIRSTOFYEAR : 

for Month= January to printMonth-l 
days=days+wonth c Month } 

next Month 
return 



FIRSTLASTMONTH : 

days-days t Month C birthMonth V 

days=days+pr i ntday-l 
return 



-b i rthday 



BIORHYTHM: 
fuliw output 
ciearw output 



continued on next page 
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1570 color output, 8, 1, 1, 0 

1580 sotoxy C 15*scalex 3,0: color l: print "Biorhythn! 11 

1590 sotoxy C 14*scalex 3 # 1 S color 3: print "By Steve Uhitney" 

16O0 sotoxy O, C 2*scaley 3 : color l 

1610 

1620 inrange=FALSE 

1630 while not inrange 

1640 it=6 

1650 print "Enter birth Month, day, and year." 

1660 print C fi, D » YY 

1670 input birthnonth, birthday, birthyear 

1680 if birthnonth>=january and b i rthnonth <=Dec enber then it=it+i 

1690 if birthday>=l and birthday<=31 then it=it+l 

1700 if birthyear>=9 and b i r thyear <=99 then it=it+l 

1710 if it=3 then inrange=TRUE else print bell$ 

1720 wend 

1730 

1740 print "Enter the person*s name: ■■ 

1750 input nanes 

1760 

1770 i nrange=FAL5E 

1780 while not inrange 

1790 it=o 

1800 print "Enter Month and year to print." 

1810 print "C M* VY 3:"; 

1820 input printnonth, printyear 

1830 if printnonth>=january and pr i ntnonth <=Dec enber then it=it+l 

1840 if printyear>birthyear then it=it+i 

1850 if printyear <=99 then it=it+l 

I860 if it=3 then inrange=TRUE else print bells 

1870 wend 

1880 

1890 honth$=nawe$( printnonth 3 

1900 year$="i9"+right$( str$( printyear 3,2 3 

1910 title$=nane$+" — "+nonth$+", "+year$ 

1920 » 

1930 SOSUb CQUNTDAY5 
1940 

1950 deu$=" " 

1960 selected=FALSE 

1970 while not selected 

1980 color 2: print "P";: color l: print "rinter or " ; 

1990 color 2: print "S";: color l: input "creen";dev$ 

20OO dev$=left$( dev5,l 3 

2010 if C dew$="S" or devs="s" 3 then deu$="s" : se 1 ec ted=TRUE 

2020 if C dev$="P" or dey$="p" 3 then dew$="p": se 1 ec ted=TRUE 

2030 if not selected then print bell$ 

2040 wend 
2050 

2060 if dev$="s» then gosub ONSCREEN 

2070 if deu$="p" then gosub 0NPR1NTER 

2080 return 
2090 

2100 » 

2110 ONSCREEN: 

2120 clearw output 

2130 gosub FANCY 

2140 sosub LABEL 

2150 color output, l, l, l, 0 

2160 sotoxy titlex-lenc titles 3/2, 0: print titles 

2170 sosub FINDR 

2180 for colunn=i to 3 

2190 color output, l, coiunn, 2, coiunn 

220O 5ize=.2: j=l-size 

2210 sosub CALC 

2220 for index=l to 3 

2230 o( index )=s( index 3 

2240 next index 

2250 for j=l to nonthC printnonth 3 step size 

2260 Sosub CALC 
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2270 co = oC colunn 3 

2280 50=5 C column 3 

2290 xl=C 70*scalex ) +indx*( j-size) : yi=C 88«scaley )-co*50 

2300 X2=( 70*scalex )+indx*j: y2= C 88«scaleg )-so«58 

2310 linef xl, yi, x2, y2 

2320 for index=i to 3 

2330 o( index )=s( index 3 

2340 next index 

2350 next j 

2360 next colunn 

2370 

2380 poke contrl,l6 

2390 poke contrl+2,1 

2400 poke contrl+6/8 

2410 poke ptsin,l 

2420 poke ptsin+2,0 

2430 udisys(l) 
2440 

2450 GETKEY: 

2460 waiting=TRUE 

2470 while waiting 

2480 keystroke=inp C consol 3 

2490 if keystroke=helpkey then gosub HELP 

2500 if keystroke=escape then wa iting = FALSE: f i n i shed=TRUE 

2510 if keystroke=space then waiting=FALSE: f i n i shed=TRUE 

2520 if keystroke=cr then wa iti ng = FALSE 

2530 if keystroke=Fl then wa iti ng=FftLSE 

2540 print bell$ 

2550 wend 



2560 return 

2570 

2580 

2590 HELP: 

2600 gotoxy heipx, he 1 pyl : print + HELP + 

2610 gotoxy helpx, helpy2: print | space or ESC = Quit I 
2620 gotoxy helpx, helpy3: print | Fl or CR = Do Another | 11 

2630 gotoxy helpx, he 1 py4 : print ■** + 

2640 return 

2650 

2660 

2670 0NPRINTER: 

2680 line8$ = string$( 65, "- ,B 3 
2690 line0$ = " '»+line85+" + " 



2700 


nid$ C 


1 ineos, 


40, 


1 


3 


= ■■**■» 


2710 


nid$ C 


1 i neo$ , 


10, 


1 


3 


ss'i | 11 


2720 


l ineis 


= blS 










2730 


nid$ C 


1 inei$. 


70, 


1 


3 


== 1 1 _t- ■ i 


2740 


hid$ t 


l ineis. 


10, 


1 


3 


— it | ■■ 


2750 


nid$ C 


l ineis. 


40, 


1 


3 





2760 line3$=nane$+space$( 76-lenC nane$ )-len( Months )-len( years 3-13 

2770 l ine3S=l ine35 + nonth$ + " ••♦years 

2780 width lprint 255 

2790 lprint chrSC escape ) ; ,l 0 n ; line35 

2800 lprint 

2810 for j=i to Month c printnonth 3 step 0-5 
2820 gosub CALC 

2830 if j=intc J 3 then Iine25=line8$ 

2840 if J=intC J 3 then MidSC line25, 2, lenc strS C j )))=str$( j 3 

2850 if JOintc J 3 then l i ne2S= l i nelS 

2860 MidSC line2S, 48 + s( 1 3*30, 1 3 =»P" 

2870 

2880 z=48+s( 2 3~30 

2890 if MidSC line2S, 2, 1 3<> ,, P" then MidSC line2S, z, 1 3 ^'E" 

2900 if MidSC line2$, 2, 1 3 = BB P" then MidSC line2S, 2, 1 3 ='"2 B " 

2918 

2920 2 = 48+5( 3 3**30: zS = Mid$C line2S, 2, 1 3 

2930 if 2$ = ,, 2 ,i then MidSC line2$, 2, 1 3 = f, 3 ,B 

2940 if note 2S = " , E" or 2S="P" 3 then MidSC line2S, 2, 1 3 = IB I" 

2950 if Z^s^E" or 25 = "P M then MidSC line2S, 2, l 3 = BB 2 BB 

2960 

continued on next pase 
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2979 
2980 
2990 

30OO 
3010 

3020 
3030 
3040 
3050 
3060 
3070 
3080 
3090 

3100 

3110 
3120 
3130 
3140 
3150 
3160 
3170 
3180 
3190 
3200 
3218 
3220 
3230 
3240 
3250 
3260 
3270 
3280 
3290 
3300 
3310 
3320 
3330 
3340 
3350 
3360 
3370 
3380 
3390 
3400 
3410 
3420 
3430 
3440 
3450 
3460 
3470 
3480 
3490 
3500 
3510 
3520 
3530 
3540 
3550 
3560 
3570 
3580 
3590 
3600 
3610 
3620 
3630 
3640 
3650 
3660 



lprint Hne25 
next j 

lprint chr$( escape 3 ; , "2 M 

lprint - = low point, *-=Hi9h point, *=criticai point ■» 

lprint p=Physical, E=enotionai, l= i nte 1 ec tua l cycle" 

lprint chr${ fornfeed 3 
return 



CALC: 

s( 1 )=sin(( j+pr )/p*pi*2 3 

s( 2 )=sin(( j+er )/e*pi*2 3 

sc 3 )=sin(( j+ir }/in*pi*2 3 
return 



FINDR : 

pr=days-intc days/p 3**P 
er=days-int( days/e 3**e 
ir=days-int ( days/in 3**in 
return 



LABEL: 

for index-0 to Month c printnonth 3 step 2 

xi=( 75**scaiex ) + ( indx*index 3: yi=( 25**scaiey 3 
x2=C 75*scaiex )+t indx^index 3: y2= C 142*scaley 3 
line* xi, yl, X2, y2 

next index 

gosub DATES 

» 

poke contrl, 16 
poke contrl+2,1 
poke contrl+6,1 
poke ptsin, 3 
poke ptsin+2,0 
udisys (13 

♦ 

xi=hixi: yl=Hiy 
X2 = tilx2: y2=hly 
linef xl, yl, x2, y2 

» 

gotoxy labx, labyl: ?"Hi9h" 
gotoxy labx, iaby2: ? ,, Crit li 
gotoxy labx, iaby3: ?"Low n 

> 

gotoxy lacxi, lacy: print ■■Phy 1 "; 
color 2 

gotoxy lacx2, lacy: print "Eno"; 
color 3 

gotoxy lacx3, lacy: print "int"; 
color l 
return 



FANCY : 
color 1,1,1,1,1 
x=len( titles 3**4*4 
restore FANCYDATUM 
for index=l to 4 

read xi, yi, x2, 
1 inef (xi^scaiex) , 
next index 
read xl, yl 
color 1,1,1,3,3 
fill C xl*scaiex 3, C 

return 

» 

FANCYDATUM: 

data 50, 28, 50, 165 



y2 



(yl*scaiey) , (x2*scaiex) 



yi*scaley 3 



(y2*scaley) 



122 ★ ANTIC SOFTWARE LIBRARY 



JUNE 1986 



3670 
3680 
3690 
3700 
3710 
3720 
3730 
3740 
3750 
3760 
3770 
3780 
3790 
3800 
3810 
3820 
3830 
3840 
3850 
3860 
3870 
3880 
3890 
3900 
3910 
3920 
3930 
3940 
3950 
3960 
3970 
3980 
3990 
4000 
4010 
4020 
4030 

4040 
4050 
4060 
4070 
4080 
4090 
4100 
4110 
4120 
4130 
4140 
4150 
4160 
4170 
4180 
4190 
4200 
4210 
4220 
4230 
4240 
4250 
4260 
4270 
4280 
4290 
4300 
4318 
4320 
4330 
4340 
4350 
4360 



data 50, 165, 250, 165 
data 250, 165, 250, 20 
data 250, 20, 50, 20 
data 290, 136 

» 



DATES: 
gotoxy datesx, 16 

*SC hirez 3 = l, 1234567891111111111222222222233 i, 
x$C Medrez 3 = li 1234567891111111111222222222233 i 
x$ c lorez ) = iB 2 6 1 2 3 ,B 

print x$ c rez 3 ; 

» 

gotoxy datesx, 17 

x$C hirez 3 =•• 0123456789012345678901" 
x$C wedrez 3 =•• 0123456789012345678901 1 
x$ C lorez } 2 2 0 M 

print x$ c rez 3 ; 
return 



INITIALIZE: 

din nonth C 13 3, o(33, SC33, nane$( 12 3 , x$ C 9 3 

rez=peek( systab 3 

hirez=l: wedrez=2: let lorez=4 

if rez=lorez then sosub INITL0REZ 

if rez=nedrez then gosub INITMEDREZ 

if rez=hirez then gosub INITHIREZ 

» 

P=23: e=28: in=33: P i =3 . 14159265 : printday=l 
OUtput=2: TRUE-C -1 3: FAL5E= C 0 3 
heipkey=226: escape=27: space=32: cr=l3: Fl=187 
consoi=2: bell=7: f i n i shed=FALSE : fornfeed=12 
bl$=space$( 80 3: belis=chr$( 7 3 
january=l : February=2 : Decenber=l2 

» 

Month c january-l 3 =Month c Decenber 3 

nonth C Decenber+i 3=31 
restore M0NTHDATUM 
for Month= January to Decenber 
read na«e$( Month 3 
read Month c Month 3 
next Month 
return 
» 

M0NTHDATUM: 

data January, 31, February, 28, March, 31, April, 30 
data May, 31, June, 30, July, 31, August, 31 

data SepteMber, 30, October, 31, NoueMber, 38, Decenber, 31 



INITLOREZ: 

scaiex=l: datesx=8: labx=i: helpy=l0: titiex=i5: indx=5 
iacxi = 5: lac«2 = 15: lacx3-22: hlxl=50: hl*2=250 
scaley=l: labyi=4: iaby2=9: iaby3=14: hly=80 
iacy=l: heipyi=9: helpy2=10: heipy3=ll: heipy4=12 
xres=319 
yres=l99 
return 



INITMEDREZ: 

scaiex-2: datesx=18: iabx=2: heipx=lO: titlex=38: indx=ie 

lac*l=10: lacx2=30: lac*3=50: hlxi=l00: hi*2=500 

scaiey=l: labyl=4: iaby2=9: iaby3=14: hiy=80 

iacy=l: helpyi=9: heipy2 = 10". heipy3=li: heipy4 = 12 

xres=639 

yres=l99 
return 
» 

continued on next page 
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4379 
4380 
4398 
4488 
4418 
4428 
4438 
4448 
4458 



IHITHIREZ: 
scaiex=2 : 
lacxi=ie: 

scaiey=2: idbyi= 4 



datesx=ie: labx=2: heipv-m. 
lacx 2 =15: lacx 3 =19: hJlJllJL tltlex =38 
labyi =4 : laby 2 %- i*k«£ 7* 8e 
lacy=i: hei P yi =9s heipj?-?*- k~? 3== " : hl *=168 

yres=399 



hlx2=588 
y=168 
Heipy4 = j L 2 



indx=ie 



return 



ST RESOURCE 



FILE I/O INTRO 



Article on page 87 



LISTING 1 



Character Repiacer progran 
File: FILEIO.C 3 a " 

version 022886 

? ntic P«"»ishin 3 
Mritten by Patrick Bass 

The purpose of this 

open, MO di,y, an^wriJe^ itr?"™^* - h ° W *° »»ct, 



ttinc 



Alcyon 
lude 



/ Mesanax Include 
"osbind . h" 



file on disk 



File 



^define 

«tdefine 

ttde f i ne 

ttdefine 

**de f i ne 

ttdefine 

»define 

ttdefine 

ttdefine 

ttdefine 

ttdefine 

ttdefine 

ttdefine 

ttdefine 

ttdefine 

ttde f i ne 

ttdefine 

ttde f i ne 

ttde f i ne 



TRUE 

FALSE 

CANCEL 

SELECT 

NO 

ERROR 

CON 

begin 

end 

wend 

repeat 

next 

endi f 

not 

equals 

does_not_equai 

then 

OR 

DELAY 



C13 

c*n 

CO} 

C3D 
C23 

t-U 

2 

■C 

> 

> 

> 

> 

> 
I 

i — 



*ort deiay= 0; delay < 2 0808, 



delay++ 



inx contn t 12 3 , 

intinc 256 3,' P tsin[ 256 3 
mtoutt 256 3, Ptsoutf 2S6i 
workint3=< i 1 ■% * * « f 56 3 ' 

handle, *^-*2 >, workout t 57 3 

^ J i f r'x C 1 ; n !---- u -P_cnaracter. 

?^nn 2 ' MCen ' yres ' fcurr, 

^ Max - co »or, delay, driwe 
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char file_buffer[ 24576 J, 
path LI = BB a :**.**\0 B ", 

in-.fi lenane E3 = ,B f i lenane . c VJJ", 

out^f i lenane ll = ,, f i lenane . c VO", 

aiert0C3="Ci3 C -File I/O- v. 022886 ][ Perforn 3", 

chralert []="[3] t Character to convert-) $ 3 E + l I +32 I Select 3 M , 

repalert [3 =•■ E33 C Chanse to character-) 5 3L+11+32I Select 3«" # 

oreadaiert ti [33 [ select the file to read frow. 3C select 3", 
owr i tealert E3 =■■ C33 I Select the file to write to. 3t Select 3 ,B , 

alert3 E3 =" E33 t Read another file? 3 t Yes I No 3", 

alert4 C3 ="C33 C Thanks for using I -File I/O- m . 022886 3C Exit 3"; 



long nax__ien=24576, write_handie, write— bytes; 

double nuhber; 

/** **/ 

nain() 
begin 



initial ize() ; 

do begin 

pick-.character C3 ; 
pick-.repiacenent C3 ; 
read-the- f i le (3 ; 
convert..the^fi le C3 ; 
wr i te— the— f i le() ; 

repeat while t not finished 3; 

terminate C3 ; 

end 

/** **/ 

initial ize C3 
begin 

appl.init C3 ; 

handle=graf-handie( *i , &i , *i , &i 3; 
u.opnuwk ( workin, ^handle, workout 3; 

fori*— aiertc ±, alert© 3; 

f inished=FflLSE; 
f or— reading=0; 

end 

/* **/ 

pick— character C3 
beg i n 

int value; 

button=FftLSE; 
charac ter=8; 

chraiertt 29 3=»0*; chralertc 30 3=*0»; 
chralertt 32 3=» »; 

while C button does— not— egua 1 SELECT 3 begin 
button=forw— alert C 3, chralert 3; 

if ( button equals 1 3 then character = character + l; 
if ( button equals 2 3 then character=character + 32; 

ualue= C (charac ter>>43 &0x000f 3 ; 

if ( value > - 0x0a 3 then ualue=ualue + ex07; 

ualue=ualue+0x30; 



■ 
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chraiertt 29 3=value; 
value=(character&ex8O0f) ; 

if ( value > = 0x0a 3 then vaiue = vaiue + 0xfl7; 

ualue=ualue+0y38; 

chralert[ 38 ]=value; 

chralert[ 32 3=character; 
if ( character equals 0x8880 OR 
character equals 8*885d OR 

character equals 8x887c 3 then chralertc 32 1=* 

wend 

end 

**/ 

pick-.replacewent C3 
begin 

int ualue; 

button=FAL5E; 
rep_charactep=e; 

repalertt 29 3=*8»; repalertt 38 1=»8»; 
repalertt 32 3 = * »; 

while C button does— not— equal SELECT 3 begin 
button=forML.alert( 3, repalert 3; 

if ( button equals 1 3 then rep-character=rep-Character + i; 
if ( button equals 2 3 then rep«character=rep-Character+32; 

ualue=CC rep— charac ter>>4 3&8x888f 5; 

if ( value > = 0x0a 3 then value = uaiue + 0x07; 

vaiue=vaiue+0x30; 

repalertt 29 ]=vaiue; 

ualue=( rep— charac ter«8x888f 3; 

ifC ualue >= 0x0a 3 then value=ualue+0x07; 

uaiue=vaiue+0x30; 

repalertc 38 ]=value; 

repalertt 32 ]=rep^character; 
if I rep_character equals 8*8888 OR 
rep_character equals 8*885d OR 

rep— character equals 8x887c 3 then repalertt 32 3 = * *; 

wend 

end 

/** • **/ 

read-the- f i le C3 
begin 

forn_aiept( 1, oreadaiert 3; 

driue=D9etdPM() ; 

patht 8 3=t drive+»A» 3; 

fsel- inputc path, i n— f i l enane , ^button 3; 

if ( button does«not-.equal CANCEL 3 then begin 

read— handle=Fopen C in— filename, for— reading 3; 
iff read_handle > ERROR 3 then begin 

bytes— read=Fread c read— handle, max— len, file— buffer 3; 

endi f 

FcloseC read— handle 3; 

endi f 

end 
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**/ 

conuert_the_f i le o 
beg i n 

fore 1=8; Kbytes^read; 3 begin 

ifC fiie^buffer[ i 3 equals character 3 then begin 
fiie_bufferr i ]=rep^character; 

end j f 

next 

end 



**/ 

wr ite-thef i le O 
begin 

forn.aiertc 1, owritealert 3; 
f iie_handle=ERROR; 

fsei-_input( path, out^f iienane, «button 3; 

if ( button does_not_esual CANCEL 3 then begin 

f i ie_handle=Fcreate ( out— f i 1 enane , 8 3; 
if ( file— handle > ERROR 3 then begin 

Fwritef file— handle, (long)bytes_read, &fiie_ buffer 3; 

end i f 

FcioseC file— handle 3; 

endi f 

button=f ori-i— alert C 2, aiert3 3; 

if ( button equals NO 3 then f ini shed=TRUE ; 

end 





terwi nate C3 
begin 

forw_ alertc 1, alert4 3; 



u— clsvwkC handle 3; 
appl— exi t C3 ; 



end 
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LISTING 1 



Don't type the 
TYPO II Codes! 




I A 

E0 
GL 
EY 



TH 
0U 
UG 

RU 
ZZ 

JC 

UF 
01 



18 
NE 
20 
38 
48 



REM ARTISTIC MATHEMATICS, LISTING 0 



REM BY MARIAN LORENZ' ALL AN MOOSE 
REM to 1986, ANTIC PUBLISHING 
GRAPHICS 2*P0KE 712,148:? «6 : ? «6 * ? 
»6*? «6;" ARTISTIC"*? «6 ; MATH 

EMATICS" 

41 ? »6 ' ? »6i" part i M 

? ,"BY LORENZ'MQOSE" * POKE 
? :? " (c) 1986, ANTIC 



752, 1 
PUBLI5HIN 



GOSUB 540 
DIM PR1* C964J 



PR2$c964>,HD*c4>,A*c4 



42 
43 
G" 
44 
45 
2) 

46 A* = "hOmSk]|ift][M^haNhC1 ChhCIZhCIUhClUhhCITh 
hBOLiawa! LOHJ" * A* C39, 39J =CHR$ C34J 

47 DRAU = ADRCA*> ^GRAPHICS 8 

58 POKE 752#1»? "^PRINTER * " « ? : ? "tipso 
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PB 
BK 

EA 

UZ 

UM 

uu 

BL 
UA 

YZ 
IM 



n .. J? "Utar/GeMini";? "aione" » ? >1 M Choo 
se One" 

52 POKE 764,255 

53 IF PEEKC764>=42 THEN M0DE=24'G0T0 5 
8 

64 IF PEEKC764J=62 THEN M0DE=16:G0T0 5 
8 

55 IF PEEKC764>=35 THEN MODE=0 : GOTO 58 

56 GOTO 53 

58 POKE 764,255:GM = 8:TRAP 68 GRAPHICS 
15 

59 GM = 15 

60 TRAP 40000 : GRAPHICS GM+16:G05UB 750 



70 COLOR 1 

80 FOR LINE=0 TO 191 STEP 2 

continued on next page 
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YH 98 IF GM=8 THEN X=U5R cDRAW, 0 , LINE , 159 , 

LINE , 1) : GOTO 180 
BJ 95 PLOT 8 , LINE DR AWTO 159, LINE 
EF 188 NEXT LINE 

ZC 118 REM DETERMINE ON AXIS FOR SINE CUR 
UE 

GC 128 GRAPHICS GM+48:G0SUB 750 
RF 125 AXIS=INTC192«RNDC1>> 

IC 130 REM DETERMINE AN AMPLITUDE FOR SIN 
E WAUE 

DA 140 REM KEEP IT WITHIN SCREEN BOUND ARI 

ES 

LK 150 TEMP1=192-AXIS 

JL 160 IF AXIS<TEMP1 THEN TEMP2=AXI5 
AO 170 IF TEMPKAXIS THEN TEMP2 = TEMP1 
EA 180 AMP=INTCTEMP2«RNDC1>> : IF AMP<3 THE 
N 125 

XI 190 REM DETERMINE PERIOD FOR SINE CURU 
E 

KL 200 PER=INTC100«RNDC1>+1> 

RY 210 REM DETERMINE A PHASE SHIFT 

WC 220 PHI=6.28»RNDC1> 

SK 230 REM DETERMINE COLOR 

MX 240 HUE=INT €RND €0)*4) 

CO 260 REM DETERMINE A SPACING FACTOR 
YU 270 FDGFACTR=INTC3*RNDC1>>+1 
FH 280 REM PLOT PICTURE 
DO 290 COLOR HUE 

ZC 300 FOR X=0 TO 159 STEP FDGFACTR 

GO 310 Y=AMP*€SIN€X'PER-PHI))+AXIS 

SE 320 IF GM=8 THEN JNK=USR CDR AW , X , A X I S , X 

, Y , HUE* : GOTO 340 
JC 330 COLOR HUE:PLOT X , AXIS « DRAUTO X.Y 
LU 340 NEXT X 

RF 350 REM WAIT FOR USER'S CHOICE OF OPTI 
0N5 

RQ 355 GRAPHICS GM + 32:G0SUB 750:? "«(Honti 

nue n s? "(irinf's? "Have" :? M [Ouit M ; 
WU 360 POKE 764,255 

XH 370 IF PEEKC764>=18 THEN POKE 764,255: 

GOTO 120:REM CONTINUE 
BU 380 IF PEEKC764*=47 THEN POKE 764,255: 

GRAPHICS 0 : END : REM QUIT 
BU 385 IF PEEKC764)=62 THEN POKE 764,255: 

GOTO 900:REM 5AUE AS MICROPRINTER 
EM 390 IF PEEKC764>=10 THEN POKE 764,255* 

GOTO 410:REM PRINT 
QI 395 GOTO 370 

IF 400 REM SCREEN DUMP FROM ANTIC, JAN 19 
84 

TB 410 IF MODE=0 THEN ? "*N0 PRINTER 5ELE 

C T E D ! G3E3EIQ" : G 0 T 0 355 
LG 415 CLOSE »1:0PEN »1 , 8 , 0 , "P : " : ? «1;CHR 

$ €2 7) ; CHRS €64) ; CHRS €27) ; CHRS (51); CHR$ c 

MODE) 

GF 420 GRAPHICS GM+48:G0SUB 750 

DC 430 REM SET LINE SPACING AND MAKE LOOP 

UZ 440 RESTORE 460 

DC 450 FOR ME=1 TO 4 : READ I T : H D $ €ME , ME ) = C 

HR$€IT) : NEXT ME 
AP 460 DATA 27,76,192,3 

GY 470 PR1$=CHR$ €0) i PR1$ C964) =CHR* €0) : PR1 

$€2)=PR1$:PR2$=PR1$ 
OJ 480 PR1S ci , 4) =HD$ : PR2$ (1 , 4) = HD$ 
MS 490 PR1=ADR€PR1$) : PR2=ADRCPR2$) 
OK 500 DL = PEEK€560) +PEEK€56D*256 : SCR = PEE 

K€DL+4) + €PEEK€DL + 5))*256 
EM 510 FOR X=0 TO 39 » PICT=191*40+SCR+X 
UI 520 STR=USR€1536,PICT,PR1,PR2) :PRINT « 

1;PR1$:PRINT »1;PR2$ 
XB 530 NEXT X:CLOSE tti:GOTO 355 
XB 540 RESTORE 570 

QT 550 FOR ME=1536 TO 1746:READ ML i POKE M 

E , ML : NEXT ME 
ZN 560 RETURN 

QU 570 DATA 104,104,133,204,104,133,203,1 

04, 141, 192, 6, 104 
YS 580 DATA 141,191,6,104,141,194,6,104,1 

41,193,6,169 
5N 590 DATA 1,133,207,169,191,133,208,160 

, 0, 177,203, 141 
TO 600 DATA 190,6,165,207,240,28,169,0,13 

3,207,173,193 
ZO 610 DATA 6,24,105,4,141,193,6,133,205, 

173, 194, 6 

XP 620 DATA 105,0,141,194,6,133,206,76,95 
,6,169,1 

NF 630 DATA 133,207,173,191,6,24,105,4,14 
1, 191, 6, 133 
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IA 640 DATA 205,173,192,6,105,0,141,192,6 

, 133, 206, 32 
KS 650 DATA 137,6,32,146,6,32,160,6,32,13 

7, 6, 32 

BB 660 DATA 169,6,32,160,6,165,207,248,17 

7,56,165,283 
TH 678 DATA 233,48,176,2,198,284,133,203, 

198,288,165,208 
LU 688 DATA 281,255,288,151,96,173,198,6, 

41,3,18,18 

JQ 698 DATA 178,96,168,8,189,195,6,145,28 

5,232,288,192 
LG 780 DATA 4,208,245,96,173,190,6,74,74, 

141, 190, 6 

DD 710 DATA 96,160,0,189,195,6,10,10,10,1 
0,24,113 

XI 720 DATA 205,145,205,232,200,192,4,208 

, 238, 96,0,0,0,0,0 
MA 730 DATA 0,0,0,0,10,5,10,5,10,0,5,0,15 

,15,15,15 

RU 750 IF GM = 8 THEN G15 = U5R € ADR C"hP8l Ifflfffll 
♦ M ) ) 

BC 755 POKE 788,86:P0KE 789,196:P0KE 710, 

236:P0KE 712,56:P0KE 752,1 
PJ 820 REM MOUE PLOT & DRAUTO ROUTINES IN 

TO RAM, DELETE BOUNDS CHECKING €COURTE 

SY DAUID SMALL) 
RQ 830 D5 = USR €ADR € hHBvSIIIiail ;i;mDv(sJmB*BIIQCmx 

fflDKiiunm < ae* m& 4 mm a < anam* wrkmb* j 

ZM 840 RETURN 

HQ 900 POKE 752,0:? "*SAUE FILEN AME" ; » INP 
UT PR1« 

BA 910 IF LEN€PR1$X3 THEN 930 
MX 920 IF €PR1$ €1 , 1) ="D M AND €PR1$ (2 , 2) = ,( 
OR PR1S€3,3)= M : M )) OR PR1S = "C:" THE 
N 940 

GS 930 PR2$ = **D : : PR2$ €3) =PR1S : PR1S = PR2S 
PG 940 GRAPHICS GM+48:G05UB 750 : DL=PEEK €5 

60)^PEEK€56D«256 
DI 950 TRAP 900:CLO5E »1:0PEN «l,8,0,PRl$ 

UT 960 DL=PEEK€560)+PEEK€561)*256 

MH 970 I0=848:P0KE I0+2,11:P0KE 10+4, PEEK 

€DL+4):P0KE 10+5 , PEEK €DL+5) : POKE 10+8, 

0:POKE 10+9,30 
TT 980 X = USR€ADR C"hhhQLURl"> , 16) 
PR 990 PUT «1,PEEK€712) :FOR X=708 TO 710: 

PUT »1,PEEK€X) : NEXT X 
UO 1000 CLOSE ttl : TRAP 40080 : GOTO 355 



LISTING 2 



SF 10 REM ARTISTIC MATHEMATICS, LISTING T 
WO 

EO 20 REM BY MARIAN LORENZ'ALLAN MOOSE 
GL 30 REM € C ) 1986, ANTIC PUBLISHING 
EY 40 GRAPHICS 2:P0KE 712,148:? «6 : ? «6 : ? 
«6:? «6;*' ARTISTIC":? «6 ; " MATH 

EMATICS" 
RO 41 ? »6:? «6;" part ii" 

OU 42 ? ,"BY LORENZ/MOOSE*' : POKE 752,1 
UG 43 ? :? € C ) 1986, ANTIC PUBLI5HIN 

G " 

RU 44 GOSUB 540 

ZZ 45 DIM PR1$€964) ,PR2$€964) ,HDS€4) , A$€4 
2) 

JC 46 AS = "hHHI]rakiMfciir3*4hnshCl rhhJlZhJlUhnUhhnTh 
hWQLiawn! Hid " : AS c39, 39) =CHR$ €34) 

UF 47 DRAW=ADR €A$) : GRAPHICS 0 

01 50 POKE 752,1:? "^PRINTER:-:? :? "I^pso 
n":? "Btar/GeMini"!? •'[Jlone" : ? :? "Choo 
se One" 

CP 52 POKE 764,255:P0KE 195,0 
BK 53 IF PEEK€764)=42 THEN M0DE=24 : GOTO 5 
8 

EA 54 IF PEEK€764)=62 THEN M0DE=16:G0T0 5 
8 

WZ 55 IF PEEK€764)=35 THEN MODE=0:GOTO 58 
UM 56 GOTO 53 

UU 58 POKE 764,255:GM=8:TRAP 60:GRAPHIC5 
BL 59 GM=15 

UA 60 TRAP 40000 : GRAPHICS GM+16 : GOSUB 750 
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YZ 70 COLOR 1 

IM 89 FOR LINE=0 TO 191 STEP 2 

YH 98 IF GM=8 THEN X=U5R cDRAW, 0 , LINE , 159 , 

LINE, 11 : GOTO 100 
BJ 95 PLOT 0 $ LINE : DRAWTO 159, LINE 
EF 100 NEXT LINE 

ZC 110 REM DETERMINE AN AXIS FOR SINE CUR 
UE 

XP 115 GRAPHICS GM+32:G05UB 750:POKE 752, 
0 

XK 120 ? "WMHERE DO YOU WANT THE AXIS C0- 

19D"; :INPUT AXIS 
KC 122 MAMP=AXIS:IF MAMP>96 THEN MAMP=192 

IC 130 REM DETERMINE AN AMPLITUDE FOR SIN 
E UAUE 

DA 140 REM KEEP IT WITHIN SCREEN BOUND ARI 

BN 150 ? "«WHAT AMPLITUDE DO YOU UANT C0- 
"jMAMP; ")";: INPUT AMP » IF AMP > MAMP THEN 
150 

XC 160 REM DETERMINE PERIOD FOR SINE CURU 

PZ 170 ? "iWHAT PERIOD"; « INPUT PERsIF PER 

<1 THEN 170 
5L 180 REM DETERMINE A PHASE SHIFT 
ZY 190 ? "«WHAT PHASE" ; • INPUT PHI 
SE 200 REM DETERMINE COLOR 
KU 210 ? "*WHAT COLOR" ; INPUT HUE 
WC 220 PHI = 6.28*RNDC1> 

CI 230 REM DETERMINE A SPACING FACTOR 

AE 240 ? "*WHAT SPACING" ;: INPUT FDGFACTR 

JK 250 IF FDGFACTR<1 THEN 240 

FH 280 REM PLOT PICTURE 

GR 290 GRAPHICS GM+48'GOSUB 750 

ZC 300 FOR X=0 TO 159 STEP FDGFACTR 

GO 310 Y=AMP*CSINCX'PER-PHI>>+AXIS 

TO 315 TRAP 59 m w 

5E 320 IF GM=8 THEN JNK=U5R CDRAW, X , AXIS , X 

, Y,HUE) :GOTO 340 w „ 

JC 330 COLOR HUE^PLOT X , AXIS « DRAUTO X,Y 

LU 340 NEXT X r \ 

RF 350 REM WAIT FOR USER'S CHOICE OF OPTI 

0N5 

RQ 355 GRAPHICS GM+32:G0SUB 750:? "nMonti 

nue"s? "fsJrint":? »Bave H s? "[Quit" J 
WU 360 POKE 764,255 

EK 370 IF PEEKC764>=18 THEN POKE 764,255: 

GOTO 115:REM CONTINUE 
TH 380 IF PEEKC764»=47 THEN POKE 764,255: 

POKE 82, 2 : GRAPHICS 0 : END : REM QUIT 
BU 385 IF PEEKC7641=62 THEN POKE 764,255: 

GOTO 900'REM SAUE AS MICROPRINTER 
EM 390 IF PEEKC764>=10 THEN POKE 764,255: 

GOTO 410:REM PRINT 
QI 395 GOTO 370 

IF 400 REM SCREEN DUMP FROM ANTIC, JAN 19 
84 

TB 410 IF MODE=0 THEN ? "*NO PRINTER SELE 

CTED !□□□□" s GOTO 355 
LG 415 CLOSE »1 : OPEN «1 , 8 , 0 , " P : " > ? »1;CHR 

* C2 7) ;CHR*c64) ;CHR$c27) ;CHR*c51) ; CHR$ c 
MODE) 

GF 420 GRAPHICS GM+48'G05UB 750 

DC 430 REM SET LINE SPACING AND MAKE LOOP 

UZ 440 RESTORE 460 

DC 450 FOR ME = 1 TO 4 * READ IT *HD* CME , ME) =C 

HRS cIT) : NEXT ME 
AP 460 DATA 27,76,192,3 

GY 470 PR1*=CHR* C0J : PR1$ C964> =CHR« C0J : PR1 

9 C2> =PR1* : PR2$=PR1* 
OJ 480 PRl*ci,4)=HD*«PR2*ci,4)=HD$ 
MS 490 PR1=ADRCPR1$) i PR2= ADR CPR2*) 
OK 500 DL = PEEKc560)+PEEKc56D*256:SCR = PEE 

KcDL+4) + cPEEKcDL+S) )*256 
EM 510 FOR X=0 TO 39 » PICT=191*40+SCR+X 
UI 520 STR=USRC1536,PICT,PR1,PR2) : PRINT « 

1jPR1*'PRINT »1;PR2* 
XB 530 NEXT X : CLOSE ttHGOTO 355 
XB 540 RESTORE 570 ' - nn „ c M 

QT 550 FOR ME=1536 TO 1746:READ ML : POKE M 

E , ML : NEXT ME 
ZH 560 RETURN _ ■ _ m 

QW 570 DATA 104,104,133,204,104,133,203,1 

04,141,192,6,104 _ m 

Y5 580 DATA 141,191,6,104,141,194,6,104,1 

41,193,6,169 „ 
SN 590 DATA 1,133,207,169,191,133,208,160 
,0,177,203,141 
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Tfl 600 DATA 190,6,165,207,240,28,169,0,13 

3,207, 173, 193 
ZO 610 DATA 6,24,105,4,141,193,6,133,205, 

173, 194, 6 

XP 620 DATA 105,0,141,194,6,133,206,76,95 
, 6, 169 , 1 

NF 630 DATA 133,207,173,191,6,24,105,4,14 

1, 191, 6, 133 
IA 640 DATA 205,173,192,6,105,0,141,192,6 

, 133, 206, 32 
K5 650 DATA 137,6,32,146,6,32,160,6,32,13 

7, 6, 32 

BB 660 DATA 169,6,32,160,6,165,207,240,17 

7,56, 165,203 
TH 670 DATA 2 3 3,40,176,2,198,204,133,203, 

198,208,165,208 
LU 680 DATA 201,255,208,151,96,173,190,6, 

41, 3, 10, 10 

JQ 690 DATA 170,96,160,0,189,195,6,145,20 

5,232,200, 192 
LG 700 DATA 4,208,245,96,173,190,6,74,74, 

141, 190, 6 

DD 710 DATA 96,160,0,189,195,6,10,10,10,1 
0,24, 113 

XI 720 DATA 205,145,205,232,200,192,4,208 

,238,96,0,0,0,0,0 
MA 730 DATA 0,0,0,0,10,5,10,5,10,0,5,0,15 

, 15, 15, 15 

RU 750 IF GM = 8 THEN G15 = U5R c ADR C"hO0 . KlfUQl 

♦ i j 

MO 755 POKE 708,86:POKE 709,196:POKE 710, 
236:P0KE 712,56:P0KE 752,1:P0KE 82,1 

PJ 820 REM MOUE PLOT & DRAWTO ROUTINES IN 
TO RAM, DELETE BOUNDS CHECKING cCOURTE 
SY DAUID SMALL) 

RQ 830 DS = USRcADR€**hBvBIII]QII[JimGv[jmBBvBliaail^ 

maKBianH mu«m& < sjha < amwro* wm* wn* i ) 

ZM 840 RETURN 

HQ 900 POKE 752,0:? "*5AUE F I L EN AME " ; : INP 
UT PR1S 

BA 910 IF LENCPR1$J<3 THEN 930 

MX 920 IF CPR1*C1,1>="D" AND CPR1$C2,2)=" 

i" OR PR1$ C3, 3) = ":") ) OR PR1$="C:" THE 

N 940 

G5 930 PR2$="D : " : PR2* c3) =PR1$ : PR1*=PR2$ 
PG 940 GRAPHICS GM+48:G0SUB 750 : DL = PEEK <5 

60)+PEEKc56D*256 
DI 950 TRAP 900:CLO5E «i:OPEN »1,8,0,PR1$ 

UT 960 DL=PEEKC560) + PEEK C56D *256 

MH 970 I0=848:P0KE I0+2,ll:P0KE 10+4, PEEK 

cDL+4):P0KE 10+5 , PEEK cDL+5) : POKE 10+8, 

0:POKE 10+9,30 
TT 980 X=U5R CADR c-hhhDLUm") , 16) 
PR 990 PUT »1,PEEKC712) :FOR X=708 TO 710: 

PUT ttl, PEEKCX) : NEXT X 
UO 1000 CLOSE »l:TRAP 40000:GOTO 355 
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MP 10 REM ARTISTIC MATHEMATICS, LISTING T 
HREE 

EO 20 REM BY MARIAN LORENZ'ALLAN MOOSE 

GL 30 REM c C ) 1986, ANTIC PUBLISHING 

MM 35 REM cC RE ATE 5 LINES 46, 750 AND 830 

FOR BOTH LISTINGS ONE AND TWO) 
CQ 40 REM CLINES 10-220 MAY BE USED WITH 

OTHER BASIC LOADERS IN THIS ISSUE . 
IS 45 REM CHANGE LINE 70 AS NECESSARY) 
MG 50 DIM FN$ C20) , TEMP5 C20) , AR$ C93) 
HO 60 DPL=PEEK C18592) : POKE 10592,255 
WO 70 FN*="D : LINES . LST" : REM THIS IS THE N 

AME OF THE DISK FILE TO BE CREATED 
YS 80 GRAPHICS 0:? " ANTIC'S GENERIC 

BASIC LOADER" 
CD 90 ? ,"BY CHARLES JACKSON" 
PW 100 POKE 10592, DPL : TRAP 170 
PO 110 ? :? :? "Creating ";FN$:? "...Plea 

se stand by." 
LQ 120 RESTORE : RE AD LN : LM = LN • DIM A$ <LN) : 

C = l 

BK 130 AR$="" : READ AR$ 

XW 140 FOR X = l TO LEN CARS) STEP 3 : POKE 75 
2, 255 

continued on next pase 
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DG 150 LM=LM-ls POSITION 18,10:? "(Countdo 

wn . . . T ~ ; INT cLM'10> ; 
Uy 160 A$cC*C>=CHR$cUALcAR$cX*X+2)>> :C=C+ 

l:NEXT XsGOTO 130 
MZ 170 IF PEEKC195J=5 THEN ? :? :? ••□TOO 

MANY DATA LINES!-:? -CANNOT CREATE FIL 

E!":END 

CZ 180 IF C<LN+1 THEN ? :? "QTOO FEU DATA 

LINES!":? -CANNOT CREATE FILE ! - : END 
AL 200 OPEN »1,8,0,FN$ 

PP 210 POKE 766, 1:? stl ; fl$ ; : POKE 766,0 
AF 220 CLOSE **1 : GRAPHICS 0:? 
it 

FT 1000 DATA 222 

EF 1010 DATA 0520540320650360610341042010 
03240015201005240 00109610413 3092104133 
09110410413 309010413308 6104 
DT 1020 DATA 1330851041041330841041041412 



510 02169017133033076252124034058065036 

040 051057044 051057041061067 
US 1030 DATA 0720820360400510520411550550 

53048032073070032071077061056032084 8 72 

06907803207104 905 3061085083 
AO 1040 DATA 0820400650688820400341041730 

4800213320817304 900213320916000316907 8 

14 5208160006177208201015208 
HC 1050 DATA 0041690141452082010792068841 

6 98 7814528828819228514423316988 7133887 

896 83484184115585685184 8832 
OS 1868 DATA 8688838618850838828488658688 

82 84 00 34104162000189252252157252124232 

224 000208245162000189252253 
ZP 1070 DATA 1572521252322240752082451621 

2614215212514203812620214206512616 92 34 

14124 612514124 7125141248125 
XD 1000 DATA 096034041041155 



Atari Writers, 




There's a new excitement in the Atari world these 
days. New programming tools and an increasingly 
sophisticated user base are creating ever more 
powerful and ambitious programs for publication 
in Antic. 



Programmers, Reviewers 

8-Bit Or ST 

Antic Pays To Publish 
Outstanding 



We pay for the best in type-in Atari programs, 
either for the 8-bit computers or the new ST line. 
Antic is primarily looking for useful practical appli- 
cations, or for tutorial demonstrations that teach 
readers how to program more effectively. Entertain- 
ing games are also welcome. Languages of choice 
are BASIC and assembler (plus C for the ST). We also 
publish some Logo and ACTION! listings. 




Work 
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With all the new Atari products coming to market, 
Antic is once again open for freelance reviews— and 
for freelance articles without programs. If you have 
never written for us before, you'll need to send a 
sample review or article so that your writing can be 
evaluated before we consider you for an assignment. 

Material accepted by Antic should be submitted 
both as disk files and printed hardcopy format. Your 
submissions cannot be returned to you unless you 
provide a stamped, self-addressed return evenlope. 
Please mail your submissions to: 

Editor 

Antic Magazine 

524 Second Street 

San Francisco, CA 94107 

JUNE 1986 



ADVERTISERS LIST 

This list is provided as a convenience and as a courtesy to advertisers. ANTIC does not guaran- 
tee accuracy or comprehensiveness. 

ABACUS SOFTWARE 55 
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ADD-ON SYSTEMS 63 

AMERICAN TV 100 
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B & C COMPUTERVISIONS 132 

BATTERIES INCLUDED 134 
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XLENT 25 
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We encourage you to patronize our advertisers— all of whom support the ATARI computer. We 
will appreciate your mentioning ANTIC when you contact these firms. 



ST ADVERTISERS 



Be sure to mention ANTIC when contacting these 
advertisers— all of whom support the Atari ST Computer. 

ABACUS SOFTWARE 55 

BECKMEYER DEVELOPMENT 86 

COMPUCLUB 99 

COVOX 98 

GUMBALL EXPRESS 45 

HABA/ARRAYS 38 

HIPPOPOTAMUS SOFTWARE 70 

MICROTYME 27 

MIRAGE CONCEPTS 69 

PECAN SOFTWARE 71 

PENGUIN SOFTWARE 68 

PROSPERO SOFTWARE 76 

REGENT SOFTWARE 131 

SENECOM 86 

SHANNER INTERNATIONAL 82 

WORLD TRADE 97 



This list is provided as a courtesy to our advertisers. Antic 
does not guarantee accuracy or comprehensiveness. 




Regen 




REGENT BASE 

A FULL FUNCTION 
RELATIONAL DATABASE 
Regent Base's procedural language 
make it a natural for handling any of your 
small business needs. Modules are 
available for Invoicing, Accounts 
Receivable, Checkbook Balancing, 
General Ledger, etc. 
Regent Base is a relational database 
written specifically for the Atari ST. Don't 
settle for simple clones of IBM products. 
Regent Base is easy to use and state-of- 
the-art! 



REGENT SOFTWARE 

7131 Owensmouth, Suite 45A 
Canoga Park, CA 91303 
(818) 883-0951 



ATARI ST 




MARKET 



Now your 8-bit ATARI 
can have real windows 
when you use SCREENS. 

SCREENS is an easy to learn, easy to use, all machine 
language utility designed to make windowing on the 
ATARI fast and fun 

Open and use windows in any graphics mode using 
standard BASIC commands. Nine independent win- 
dows can be created Each window scrolls and clears 
without effecting the display outside its borders. 
For each window use default characteristics or set 

• window position and size with pixel resolution, 

• text position and size with pixel resolution, 

• user-defined font (8x8 and 1 6x1 6 grids supported), 

• text color and display logic for special effects, 

• ... and more ! 

Windows can be stored away in RAM or on disk in a 
standard or compressed format. They can be retrieved 
and when redisplayed are automatically sized to fit the 
current window. 

The SCREENS diskette and detailed manual are only 
$19.95. NY state residents must add 7% sales tax. To 
order, please send your check or money order to 

The Soft Cellar P.O. Box 1 6393 
Rochester, NY 14616-0393 



ATTENTION! 1 



Cut or copy 
the label off 
your magazine. 

Tape or staple 
the label to the 
disk subscrip- 
tion form, 
"THE ACTION 
EDITION;" in 
the magazine. 




Antic will bill 
the difference 
to you person- 
ally or charge 
your Visa or 
Mastercard. 
Please indicate 
which you pre- 
fer on the disk 
subscription 
form. 



810 ON A PLATE 
DISK DRIVE $100. 



Printed Circuit Boards (PCB) w/parts 

800 Main .... $10 16K RAM ... $10 810 Analog ... $10 

800 Power ... $5 10K0S $10 810 Power .... $15 

CPU w/GTIA . . $10 810 side w/0S$40 1200 XL .... $35 
800 XL $50 

IC $5. ea GTIA, 800 ANTIC, 800 CPU, XL CPU, POKEY, 6520 
PIA.6507, 444,6532,6810, 810 ROM C 
IC $10. ea XL ANTIC, MMU, XL/XE OS, BASIC C, 850 ROM B, 
1050 ROM, 177) 

Complete working 810 Less case $120.00 ($100.) 

With B&C Black Anodized Case $140.00 ($120.) 

With Case and Happy Upgrade $220.00 ($200.) 

Field Service Manuals 800/400, 800XL or 810 .... $25. ea 

For 1050, 1025, 1027, 825, 850 or 1200XL $20 ea 

Diagnostic Cartridges Computer or Disk $25. ea 

($) Prices in parenthesis do not include 1/0 Cable or 
Power Pak 



^^Carputervfsions 749-°i003 
3283 Kiler Rd.. Santa Clara. CA 95051 



P0WEREdIT for the 520ST 

FEATURES: 

* Edit up to 8 files concurrently 

* Copy or move data between files 

* Full mouse functions 

* Line prefix commend processor 

* Not limited to 80 character records 

* Full documentation on disk 

* Powerful, flexible and easy to use 

Send $44.95 check or M.O., or call 
(206) 885-7949 for VISA/MC orders. 
— WA. State Res. add appl. sales tax - 

If you have no printer, add $5.00 and 
we will include hardcopy documentation. 



■owe ft% 



43328 S. E. 176th 
North Bend, WA 98045 
(206) 888-2828 



Software Tools 

MICRO C-Shell $49.95 

Unix style C shell with aliases 
I/O Redirection, & batch files. 

MICRO C Tools $24.95 

Unix style software tools for 
text editing and debugging. 

MICRO Make $34.95 

Automatically builds programs. 
Creates batch files or executes 
compiler/linker etc. directly. 

Atari ST and IBM PC Versions 

(415)658-5318 

Beckemeyer Developent Tools 
592 Jean St. #304 
Oakland, CA 94610 



PROGRAMMERS 

Have you written a program for the 
ATARI 8-bit computer? Are you 
interested In marketing your pro- 
gram? if you answered "YES" to 
both questions, send your program to 
PROGRAMMERS CO-OP for eval- 
uation. Your program will be given 
strict confidential treatment during 
evaluation. If your program is one of 
the many chosen by PROGRAM- 
MERS CO-OP, you will have the 
opportunity to be in our catalog. The 
catalog will be distributed to Atari 
owners. PROGRAMMERS CO-OP 
will pay you a generous royalty for 
each copy of your program sold. 

PROGRAMMERS CO-OP 

1506 Via Christina, Evaluation Dept. A 
Vista, California 92084 
Phone: (619) 724-8832 



800XL Memory upgrade 
(Ran Disk) 

512 K 
159$ 

Compatible with the 
130XE, easy to install 



Int. Honey Order 
Add. 5$ Shipping 
10$ Air Hail 

Mail to: Irata 
Hermanns tr. 9 
1000 Berlin 44 
West - Germany 



YOUR AD 
COULD 
APPEAR 
HERE 




Another Great Simulation from Sid Meier - 
Author ofF-15 Strike Eagle 

Now he takes you from the cold, thin air and limitless space ofF-15 Strike Eagle down into 
the dark depths of the Pacific Ocean inside an American World War II submarine for a 
realistic, action- filled simulation — A 




eilTMT 




Thrill to the initial sighting of the 
enemy's strike force in your peri- 
scope as their ships come into your 
range. But watch out — the enemy's 
escorts have just sighted you. You're 
the hunter — but suddenly — you've 
become the hunted! 

As Commander, you must sink their 
ships and keep your submarine from 
being destroyed — if you can. Will you 
select a quiet patrol sector in the 
Marianas Islands or choose the 
dangerous waters off the coast of 
Japan? Is a submerged daylight 
periscope attack best or do you 
charge in on the surface at night 
using only radar bearings to guide 
you? Do you fire a spread of your pre- 
cious torpedoes or can you close the 
range and pick off the enemy with a 
single torpedo shot? These decisions 
and many more are yours to make as 
you take your place among the elite 
ranks of the SILENT SERVICE! 

It's exciting — and it's fun. It's 
another great Micro Prose simulation 
— and it's called SILENT SERVICE. 

Look for it now on your 
dealer's shelves. 





FIVE AUTHENTIC 
BATTLE STATION SCREENS 



Silent Service Is available for Commodore 64/128, 
Apple II Family, Atari XL/XE, IBM PC/PC Jr. 
computers for a suggested retail of only 
$34.95. Available soon for Macintosh for a 
suggested retail of only $39.95. Call or 
write for more information or MC/VISA orders. 



COMMODORE. APPLE. ATARI. IBM. and MACINTOSH, 
arc registered trademarks ot Commodore Business Inc . 

Apple Computer Inc . Atari Inc.. and International 

Business Machines Inc.. respectively 



Photo courtesy Baltimore Maritime Museurr 



Daring Attack Helicopter 
Action in the AH-64 Apache! 



Thrilling Decathalon of aerobatic 
events in your own personal jet!! 



You are in command - 
North Africa 1940-1942 



AKRO PROSE 



SIMULATION 



SOFTWARE 



120 LAKEFRONT DRIVE • HUNT VALLEY, MD 21030 • (301) 667-1151 



THE 



Premier Word Processing 




Package 



- CREATIVE COMPUTING 



"PaperClip is easy to use, yet offers the advanced features of programs designed for the IBM PC. These include: block move 
copy, delete, macros, automatic page numbering, headers, footers, underlining, boldface, super and subscripts, variable . 
character pitch, and custom character sets. The editing screen can be set up to 130 columns wide, & text can be scrolled in any 
direction. A preview mode displays formatted text exactly as it will appear on the printed page. You may further define your 

own formatting parameters, including, margins, line lengths, page length and spacing. 
PaperClip contains over 30 printer files for all the current major models. The documentation is excellent and the disk itself un- 
protected, though keyed through a joystick port. This means you can make as many back-up copies as you like, but can use the 

program only when the key is inserted." CREATIVE COMPUTING 

"PaperClip is one of the easiest of the professional word processors to use, with a sensible mam, 

aids for the accident-prone." COMPUTING NOW 

"a "must have' in an ideal software 

"PaperClip is the Cadillac of word processors" OMNI 

"an excellent full-featured word processor" THE BOOK C 

"So clearly superior, ...State-of-the-art word processing" ANTIC 

"So far as we are concerned, PaperClip is the top word processof 

HOME APPLICATIONS FOR THE; 

"exceptional word processing" INPUT "many features. . .easy 
"You'll find yourself growing spoiled" FAMILY COMPUTING 
"A superb word processor, ...the most sophisticated to i 
". . .does exactly what it was intended to do. 
"An excellent word processor, . ..well designed 

". . . facts attest to its excellence! ' 



"You will not find a word processing package superior to this 
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The // Best Selling Word Processing Package"* 

BILLBOARD'S COMPUTER SOFTWARF CHARTS' 
Available for Commodore 64, Pet, all Atari home computers, and new enhanced 128K versions for Apple ll/e/c, 
Atari 1 30XE and Commodore 1 28. New in 1986: Paperclip Elite for IBM MS DOS, Amiga and Atari ST. 



30 Mural Street 
Richmond Hill, Ontario 
L4B IBS Canada 
(416)881-9941 
Telex 06-986-266 




INCLUDED^ 



"The Energized Software Company!" 

WRITE TO US FOR FULL COLOR CATALOC of our products for Commodore, Atari, Macintosh, Apple and IBM systems. 
FOR TECHNICAL SUPPORT OR PRODUCT INFORMATION PLEASE PHONE 14 161 881-9816 

98S BATTERIES INCLUDED MACINTOSH APPLE. ATARI. COMMODORE AND IBM ARE REGISTERED TRADEMARKS RESPECTIVELY OF APPLE COMPUTERS INC 
ATARI INC . COMMODORE BUSINESS MACHINES INC AND IBM BUSINESS MACHINES INC 

'as compiled from national retail store sales reports lor week ending January 5. 1985 
IF YOU WOULD LIKE 10 UPGRADE 10 I HE NEW SPELL PACK VERSION SEND US YOUR ORIGINAL DISK PLUS S15 00 
IF YOU CAN T FIND PAPERCLIP AT YOUR FAVOURITE SOFTWARE OUTLET YOU CAN UROER DIRECT FROM US AT THE FULL SUGGESTED LIST PRICE (PLUS S5.00 FOR POSTAGE AND SHIPPING) BY CALLING 1 -800 387-5707 

ATARI & APPLE PAPERCLIP $59.95 PAPERCLIP II FOR THE CI28 S79.95 



1787S Sky Park North, 
Suite P, Irvine, California 
USA 92714 
(416) 881-9816 
Telex: S09-139 



